Canarias 175 pts. 



fe 

N.°19-P.V.P.175 pts. (incluido 



PROGRAMAS 



Minuete de 
Mozart 

Cuatro en Raya 
Phantom 

Naturalmente, todos 



TEST DE LISTADOS 



IMAGEN POR 
ORDENADOR 




Conoce un poco más de la 
técnica que está 
revolucionando ios medios 
visuales 



MONITOR: 



PRIMERAS 
JORNADAS 
DEL MSX 



CAZAPIRATAS 



Colabora a terminar con los 
parásitos 

Compra, vende, intercambia en 
nuestro 



TABLON DE ANUNCIOS 



Editorial 



A dos semanas escasas de la inau- 
guración de SONIMAG'86, aún 
prosigue la incomprensible proli- 
feración de diferentes estándares 
que dicen venir dispuestos a co- 
merse el mundo. Cierta prestigio- 
sa marca que en la pasada edición 
de esta feria, haciendo alarde de 
fuerza y promesas de continuidad, 
se presentaba como un serio rival 
de la norma MSX ha tenido que 
plegar velas y "asociarse" con otra 
de cuya escasa fiabilidad en el 
aspecto de la compatibilidad ya 
nadie puede dudar. Todo ello nos 
hace reflexionar una vez más so- 
bre las falsas profecías de ciertos 
sectores, una prensa decididamen- 
te adversa al MSX, que auguraban 
una corta vida a nuestro estándar. 
Sepan pues de una vez que la ra- 
cionalidad del MSX ha sido el me- 
jor argumento que ha decidido a 
miles de usuarios y que ahora es el 
momento de reflexionar sobre 
aquel viejo refrán que reza "aun- 
que la mona se vista de seda, mona 
se queda", porque refritando mo- 
delos, adaptando carcasas y todo 
tipo de apaños por el estilo no se 
consigue ganar credibilidad. Bue- 
no, tal vez algún despistado de 
buena fe se deje cautivar por las 
promesas de esos estándares de 
cuya obsolescencia no cabe la me- 
nor duda. Y eso es una lástima 
pues antes de comprar hay que 
informarse a riesgo de no quedar- 
se con una máquina que al poco se 
convierta en chatarra informática. 
Después de tanto /tiempo en el 
mercado, lo que ya es indiscutible 
es que quien ha adquirido MSX 
no va a encontrarse en tan lamen- 
table situación. 

MANHATTAN TRANSFER 



NOTA: Debido a las vacaciones de vera- 
no se han producido ciertos retrasos en el 
envío de números atrasados. Rogamos a 
nuestros amigos lectores sepan disculpar 
esta situación anómala que, podemos afir- 
mar, ya está totalmente regularizada. 
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Línea directa 



Esta sección no puede con- 
vertirse en algo insulso y re- 
petitivo en la que, una y otra 
vez, se den respuesta a las 
mismas preguntas. Tampoco 
es posible seguir contestan- 
do cuestiones que puedan 
solventarse consultando los 
manuales de los distintos fa- 
bricantes. A estas alturas, 
necesitamos vuestra colabo- 
ración y os rogamos que re- 
mitáis preguntas en torno e 
temas novedosos y que re- 
sulten, en lo posible, amenas 
para el resto de los lectores. 
Dicho esto, es conveniente 
zanjar definitivamente las 
cuestiones que con más fre- 
cuencia han ido apareciendo 
en esta redacción. Salvando 
el popularísimo "cómo se 
usa el test de listados" hay 
cuatro dudas que pueden ser 
calificadas como "eternas": 

1- Problemas de memoria 

2- Copias de seguridad 

3- Protección de programas 

4- Copias de la pantalla en el 
papel. 



PROBLEMAS DE MEMORIA 

Esta pregunta suelen hacerla 
usuarios de ordenadores de 




E INTERE 





menores de 64K. En síntesis, 
desean saber si hay progra- 
mas que requieren más me- 
moria y si existen periféricos 
que no se pueden conectar 
por el mismo defecto. 
En principio, y dado que 
realmente existen programas 
que necesitan más de 32K, 
puede resultar aconsejable 
adquirir un cartucho de am- 
pliación. No obstante, se en- 



cuentran mucho programas 
en el mercado que, al no res- 
petar las normas del es- 
tándar, están completamente 
incargables en los ordenado- 
res ampliados. Debemos ha- 
cer hincapié que esto no 
obedece en absoluto a un de- 
fecto de los cartuchos, sino 
de los programas. 
En cuanto a la cantidad de 
memoria que necesitan los 



Í>eriféricos, diremos que son 
os programas, y no éstos, 
quienes la determinan. Así, 
es perfectamente posible co- 
nectar a un ordenador de 
menos de 64K un joystick, 
una tableta gráfica, un lápiz 
óptico, una unidad de dis- 
cos, una impresora, etc. El 
único detalle importante es 
tener presente que el perifé- 
rico no necesite ser controla- 
do por un programa mayor 
de 32K; aunque esto sólo 
ocurre, en principio, con las 
unidades de discos. Y es que 
el MSX/DOS —que no es 
más que un programa — de- 
saloja la ROM e intenta ins- 
talarse en la RAM no accesi- 
ble al BASIC. Puesto que los 
ordenadores de 16 ó 32K no 
tiene esta RAM, el programa 
no corre. Sin embargo, es 
perfectamente yiable usar 
una unidad de discos en un 
ordenador de menos de 64K, 
si se emplea el MSX DISC 
BASIC, sistema que permite 
grabar programas y ficheros 
en cualquier formato y utili- 
zando cualquier modo de 
acceso (secuencial o aleato- 
rio). 



SUSCRIBETE 

Suscribiéndote no sólo tienes la seguridad de tener todos los meses tu 
MSX CLUB DE PROGRAMAS en tu casa sino que recibirás 12 
números pagando sólo 10 



BOLETIN DE SUSCRIPCION MSX CLUB DE PROGRAMAS 



Nombre y apellidos 

Calle jsj c 

Ciudad Provincia .... 

D. Postal Teléfono 



Deseo suscribirme por doce números a la revista MSX CLUB DE PROGRAMAS a partir del núñiero 

que pago adjuntando talón a la orden de: MANHATTAN TRANSFER, S.A. - Cí. Roca i Batlle, 10-12 - 08023 Barcelona 

Tarifas: España por correo normal Ptas. 1.750, — 

Europa por correo normal Ptas. 2.000, — 

Europa por correo aéreo Ptas. 2.500, — 

América por correo aéreo USA$ 25USA$ 

Importante: Colocar en el sobre: Departamento Suscripciones MSX CLUB. NO SE ADMITE CONTRAREEMBOLSO. 
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COPIAS DE SEGURIDAD 

El tema de las copias de se- 
guridad es, como mínimo, 
muy delicado. Día a día se 
extiende la opinión de que 
los usuarios legales tienen 
derecho a todas las copias de 
seguridad que deseen. En los 
EEUU, como país pionero 
en la informática, se tiende, 
desde hace algún tiempo, a 
entregar los programas no 
protegidos, mientras en Eu- 
ropa las versiones corres- 
pondientes sí lo están. No 
entraremos ahora en polémi- 
ca de lo que es o no justo, 
pero en tanto se sigan ven- 
diendo programas protegi- 
dos, las copias de seguridad 
habrá que obtenerlas saltan- 
do la correspondiente defen- 
sa, lo que significa tener 
buenos conocimientos de 
programación. 
Lo que no nos parece serio 
es que haya usuarios que nos 
manden cartas preguntando 
sobre cómo obtener copias 
"de seguridad" de los cartu- 
chos ROM. Incluso hemos 
recibido alguna carta para el 
tablón de anuncios que ofre- 
cen, descaradamente, exten- 
sos catálogos de programas 
piratas a precios cíe oferta. 



PROTECCION DE 
PROGRAMAS 

Parece que hay un gran inte- 
rés por conocer la forma de 
proteger programas. Para 
solventar de una vez por to- 
das el tema, es conveniente 
señalar que hay tantas for- 
mas de protección como se 
quieran, pero encontrar una 
buena requiere, cómo no, 
sólidos conocimientos. Sin 
que nadie resulte aludido ni 
ofendido, diremos que muy 
probablemente un programa 
no merecerá ser protegido si 
su autor no sabe encontrar, 
por sí mismo, un sistema 
anticopia adecuado. Por otra 
parte, en estas páginas segui- 
rán apareciendo sistemas de 
protección, que si bien no 
serán de mucha utilidad co- 
mo tales por su difusión, re- 
sultarán un buen medio para 
profundizar en las interiori- 
dades del ordenador. 



COPIAS DE PANTALLA EN EL 
PAPEL 

Han llegado hasta esta re- 
dacción bastantes cartas 
quejándose del mal funcio- 
namiento de los programas 
de copia de pantalla de Ru- 
bén Giménez. La mayoría 
de estos lectores dicen tener 
impresoras de modelos no 
MSX (Seikosha, sobre todo). 
Resulta evidente que estos 
programas, por otra parte 
perfectos, no pueden funcio- 
nar en las referidas impreso- 
ras sin hacer la adaptación de 
los códigos de impresión. 
De cualquier manera, vamos 
a editar, de forma inminente, 
una cinta conteniendo un 
programa de Hard-copy, ca- 
paz de hacer copias en varios 
tamaños y posiciones y de 
efectuar un degradado de 
grises, dando así la sensación 
de estar ante una fotografía. 
Posee, además, la capacidad 
de copiar los SPRITES, de 
hacer copias inversas, de 
almacenar las pantallas de 
cintas, etc. El programa po- 
drá ser utilizado en cual- 
quier tipo de impresora, con 
el solo requisito de que ésta 
sea matricial. 



REDONDEO 

Os mando esta rutina para 
redondear números, con los 
decimales prefijados que se 
deseen. Confío en que será 
de ayuda a algunos lectores. 
Carlos González Luñás 
Málaga 

Agradecemos tu colabora- 
ción, pero hay una forma 
más corta de redondear los 
decimales, empleando una 
función INT. Se trata de 
multiplicar el número en 
cuestión por diez elevado a 
las cifras del redondeo, apli- 
car INT y dividir el resulta- 
do por el mismo parámetro. 
A título de ejemplo, para li- 
mitar a dos los decimales del 
número PI se debe emplear: 
10 PI =3. 141 592 
20 PI=INT(Pr-100)/100 
Al ejecutar la línea 20 y al 
comprobar el valor de PI 
observarás que éste ha pasa- 
do a ser de 3.14 




CAZA PIRATAS 



Fomenta la creatividad. Respeta el dere- 
cho de autor. Centenario de la conven- 
ción de Berna 1886-1986. 



Condiciones: 

Toda denuncia para esta sección deberá venir suscripta con 
los datos personales del denunciante, aunque su nombre no 
aparecerá publicado. 

— Deberá aportarse toda documentación que acredite el 
objeto de la denuncia, de lo contrario no se tendrá en cuenta. 

— La documentación recibida se hará llegar a la marca afec- 
tada para que tome las medidas jurídicas oportunas. 

— Una vez publicada la denuncia, ya no se tendrán en cuen- 
ta las que lleguen posteriormente sobre el mismo programa. 

— Los denunciantes recibirán como recompensa el progra- 
ma original denunciado. 

— Recordamos que se considera piratería la desprotección y 
copia de programas en cualquier formato y su uso con fines 
de lucro. 




Phantasma, editado y comerciali- 
zado por LOAD'N'RUN MSX, es 
una copia del juego original CHI- 
LLER editado en cassette por 
MASTERTRONIC. 



BASES 

1. a - Podrán participar todos nuestros lectores 
cualquiera sea su edad. 

2. °- Los programas se clasificarán en tres cate- 
gorías: 

Educativos 
Gestión 

Entretenimiento 

3. °- Los programas deberán ser remitidos gra- 
bados en cassette debidamente protegidas, den- 
tro de su estuche de plástico. 

4. °- No entrarán en concurso aquellos progra- 
mas que ya hayan sido publicados por otros 
medios o plagiados. 

5. °- Junto a los programas se incluirán las ins- 
trucciones correspondientes, detalle de.las varia- 
bles, ampliaciones posibles y todos aquellos co- 
mentarios que el autor considere de interés. 

6. °- Todos los programas han de estar estruc- 
turados de modo claro, separando con REM los 
distintos sectores del mismo. 



PREMIOS 

7. °- MSX CLUB OTORGARA LOS SI- 
GUIENTES PREMIOS: 

IOYSTICK DE ORO MSX CLUB Y UNA 
UNIDAD DE DISCO AL MEJOR PROGRA- 
MA DEL ANO 

Además mensualmente se premiarán los pro- 
gramas publicados del siguiente modo: 

10.000 pts. los programas Educativos 

10.000 pts. Ios programas de Gestión 
6.000 pts. los programas de Entretenimiento 

8. °- MSX CLUB DE PROGRAMAS se reser- 
va el derecho de publicar fuera de concurso 
aquellos programas de reducidas dimensiones 
que sean de interés, premiando a sus autores. 

FALLO Y JURADO 

9. °- El Departamento de Programación de 
MSX CLUB DE PROGRAMAS hará la primera 
selección de la que saldrán los programas publi- 
cados en cada número de la revista. 

10. °- Los programas no se devolverán salvo que 
así lo requiera el autor. 

11. °- La elección del PROGRAMA DEL AÑO 
se hará por votación de nuestros lectores a través 
de un boletín que se publicará en el mes de octu- 
bre de 1986. 

12. °- El plazo de entrega de los programas finali- 
zará el 3 1 de octubre de 1986. 

13 o - El fallo se hará conocer en el número de di- 
ciembre de 1986, entregándose los premios en el 
mismo mes. 



2.° GRAN CONCURSO 





Remitir a: 



C OOnrOOiTinr 



(-CU0 UC i'KUüiK 



- MI PROGRAMA 



Roca i Batlle, 10-12, bajos 08023 Barcelona 
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Línea directa 





BIBLIOTECA 



El programa Biblioteca del 
número 14 de MSX-CLUB 
me es de mucha utilidad co- 
mo archivo. A la variable 
BC&(A) le he asignado una 
cadena numérica y con la 
función 

BC(A)=VAL(BC&(A)) 
obtengo su valor numérico 
pero no consigo hallar las 
sentencias para que me dé el 
valor total de la suma de to- 
dos los BC(A) desde A=0 
hasta C. Si me podéis dar 
una ayuda os lo agradeceré 
mucho. 

Daniel González Rosich 
Barcelona 

Para obtener la suma puedes 
emplear una línea como ésta: 
10 FORX=0TOC:SUMA 
=SUMA+BC(A):NEXT 



ESPIRAL 



¿Sabéis de algún programa 
que pueda dibujar una espi- 
ral? Gracias de antemano. 
Rosa M. Riverol Pérez 
La Laguna (Tenerife) 

Puedes obtener una espiral 
moviendo un punto con ve- 
locidad uniforme sobre un 
radio vector que a su vez se 
mueve con velocidad angu- 
lar uniforme. La figura re- 
sultante recibe el nombre de 
espiral de Arquímedes y su 
ecuación, en coordenadas po- 
lares, es: p=Kw. Las siguien- 
tes líneas dibujan la curva: 
10 SCREEN2:PI=3,141592 
20 PSET(SIN(B)*R + 128 



,COS(B)*R + 96) 
30 

R=R+.2:B=B+.lGOTO- 
20 

Para alterar el paso de la es- 
piral o el número de punto a 
trazar deberás jugar con los 
valores de B y R. Por otra 
parte, si lo que desea es re- 
presentar una espiral logarít- 
mica has de tener presente 
que ecuación en: p=e"KW 



CALCULO 

Tengo un PHILIPS MSX de 
80K y en mis cálculos aplica- 
dos a ingeniería me encuen- 
tro corto de memoria. De- 
searía que me informárais de 
los medios que hay para au- 
mentarla. 

José María García Giménez 
L'Hospitalet (Barcelona) 

No hay buen sistema para 
aumentar la memoria, la so- 
lución es aprovecharla me- 
jor. Sin embargo, resulta 
muy extraño que un progra- 
ma de cálculo ocupe la exten- 
sión que tú dices, hay que te- 
ner presente que un progra- 
mador profesional que tra- 
bajara en ASSEMBLER po- 
dría tardar años en realizar 
un programa matemáti- 
co de 64K (un juego de aje- 
drez, por ejemplo), por lo 
cual deduzco que estás em- 
pleando el BASIC. Desde 
luego éste es el peor lenguaje 
que puedes usar. Para los fi- 
nes que persigues, te aconsejo 
que adquieras un lenguaje 
compilado (Assembler, Pas- 
cal o C, entre otros), que a su 
mayor rapidez suelen añadir 
un menor gasto de memoria. 
En fin, por si te sirve de al- 
guna ayuda te diré que ha- 
ciendo MAXFILES=0 se 
ahorran 267 bytes, aunque la 
instrucción OPEN quedará 
inutilizada; que al progra- 
mar en SCREEN pueden 
usarse 13K de video, de los 
16K disponibles, para guar- 
dar datos; y que la zona de 
trabajo del PSG es suscepti- 
ble de emplearse para alma- 
cenar información, cuando 
no hay música escrita para él. 



UN LIBRO 
PENSADO PARA 
TODOS LOS 
QUE QUIEREN 
INICIARSE DE 
VERDAD 
EN LA 

PROGRAMA- 
CION BASIC 

Construcción de 
programas. El potente 
editor todo pantalla. 
Constantes numéricas. 
Series, tablas y 
cadenas. Grabación de 
programas. Gestión de 
archivo y grabación 
de datos. Tratamiento 
de errores. Los 
gráficos del MSX. 
Los sonidos del MSX. 
Las interrupciones. 
Introducción al 
lenguaje máquina. 



Y ADEMAS PROGRAMAS DE EJEMPLO 

Alfabético. Canon a tres voces. Moon Germs. Bossa Nova. Blue 
Bossa. La Séptima de Beethoven. La Flauta Mágica de Mozart. 
Scrapple from the apple & Donna Lee. The entretainer. Teclee un 
número. Calendario perpetuo. Modificación Tabla de colores 
SCREEN 1 . Rectángulos en 3-D. Juego de caracteres alfabéticos en 
todos los modos. Juego Matemático. Más grande más pequeño. 
Poker. Breackout. Apocalypse Now. El robot saltarín. El archivo 
en casa. 




I 1 

Deseo me envíen el libro de los secretos del MSX, para lo 
cual adjunto talón de 1.500 ptas. a la orden de MAN- 
HATTAN TRANSFER, S.A. 

Nombre y apellidos 

Calle n." 

Ciudad CP 

Este boletín me da derecho a recibir los secretos MSX en 
mi domicilio libre de gastos de envío o cualquier otro 
cargo. No se admite contrareembolso. 

Importante: Indicar en el sobre MANHATTAN 
TRANSFER, S.A. 

«LOS SECRETOS DEL MSX» 
Roca i Batlle, 10-12 Bajos - 08023 BARCELONA 
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Tablón de anuncios 




Esta sección de MSX CLUB es de nuestros lectores. Todos ellos tienen derecho a dos inserciones totalmente gratuitas. Las 
características de esta sección no permiten la inclusión de anuncios con fines de lucro. Advertimos que la desprotección y 
copia de software original es un acto delictivo perseguido por la ley. 



Intercambio programas comer- 
ciales en cassette por otros co- 
merciales de ARTES MARCIA- 
LES y SIMULADORES DE 
VUELO. Llamad o escribid a: 
Carlos Alberto Marín. C/. S. 
Francisco 48, 9005 Burgos. (943) 
213 065. CPI. 

Vendo y cambio toda clase de 
programas MSX. Más de 100 pro- 
gramas comerciales. Teófilo Fer- 
nández (965) 806 236 excepto 
martes y Ricardo Pérez (965) 
800 282 Villena (Alicante). CPI. 
Intercambio de programas. Po- 
seo más de 200 títulos. Carlos 
Delgado, C/. Pablo Ruiz Picasso, 
12. 50015 Zaragoza. CPl. 
Mándame una cinta con tus jue- 
gos y te la devuelvo con los míos. 
Si te interesa el cambio mándalo a 
Juan José Ritorc. C/. García de 
Paredes, 19. Badajoz 06006. Tel. 
237 687. Prometo contestar a to- 
das las cartas. CPl. 
Intercambio programas de todo 
tipo con usuarios de Barcelona. 
Poseo de los mejores. Alfons 
Elíes. C/. S. Eusebi, 8-10, 3." 2.'. 
Tel. Í93) 218 12 44. CPl. 
Vendo urgentemente Spectravi- 
deo 318 con manual en castellano, 
cables, adaptador con ON/OFF 
de seguridad y DATA CASSET- 
TE Sv-904 con muchos progra- 
mas de regalo por 30.000 ptas. ne- 
gociables. Escribir a Luis Docal 
rombo. C/. Manuel del Palacio, 
16, 36003 Pontevedra o llamar al 
(986) 859 579. CPl. 
Vendo ordenador SONY HIT 
BIT 101 P, 6 revistas del MSX, 7 
cintas con 44 juegos y utilidades y 
2 libros de introducción al MSX 
TODO ELLO POR TAN SO- 
LO 50.000 ptas. (Especialmente 
con gente de Altea o alrededores}. 
José Andrés Coreóles. Conde de 
Altea, 53, Esc. B, 2." CPl. 
Vendo o intercambio juegos de 
todas clases. Poseo más de 100 tí- 
tulos. Interesados preguntar por 
Manolo al Tel. (954) 632 194 de 
Sevilla. CPl. 

Intercambio programas de MSX 
en toda España. Poseo los mejo- 
res títulos del mercado. Llamar a 
José al Tel. (981) 200842 o bien 
escribir a: Club GOTO Coruña. 
C/. Forcarey, 39, %.% 15002 La 
Coruña. CPl. 

Urgente. Necesito información o 
clases sobre Assembler y Código 
Máquina. Pagaría por las clases; 
es muy importante. Escribir a 
Daniel Arias Llórente. C/. Peña 
Larzón, n." 55. León 24008. CPl. 
Contacto conmigo si vives en 
Baracaldo. Poseo un MSX y quie- 
ro intercambio juegos. También 
deseo comprar (o cambiar) el n." 7 
de MSX CLUB. José Miguel. 
Llamar laborales de 15 a 17 n. al 
Tel. 438 32 22. C/. Errekatxu, n." 



17, 2." D. Barakaldo. Bizkaia. 
CPl. 

Apúntate al Coub CMIP. Es co- 
mo un Video Club, sólo que con 
programas para tu ordenador. 
Envíanos 300 ptas. y tu dirección 
y recibirás una cassette con un 
programa de regalo y cada mes 
una cassette y concursos. Infor- 
mación: Antonio J. García Martí- 
nez. Camino de Ronda, 38, 1." D 
(Granada). 18004. CPl. 

Intercambio más de 60 progra- 
mas comerciales. También cartu- 
chos ROM (BILLAR, GOLF, 
etc.) o vendería a 2.900. Contes- 
taré a todos rápido. MIGUEL A. 
M. EMALDI. Labairu, n." 11-2." 
izq. BARACALDO. 48000 VIZ- 
CAYA. CPl. 

Cambio/vendo programas para 
MSX. Mándame una lista de tus 
programas. Teléfono (976) 
432 671 o escribe a Alejandro Es- 
corihuela Laborda. P." M." Agus- 
tín, 58, 11-F. 50004 Zaragoza. 
CPl. 

Intercambio programas. 100 de 
los mejores. Envía tu lista a César 
Garrote viecnte. C/. Bolívar, 33, 
3." A. 37004 SALAMANCA. 
CPl. 

Cambio, compro y vendo pro- 
gramas MSX en cassette y disco 
de 3"5", amplio surtido en progra- 
mas de juegos, educativos y ges- 
tión. Contestaré a todos pronto. 
Escribid o llamad a Ricardo Rei- 
nares. C/. Gran Vía, 56. 26002 
Logroño. Tel. (941) 223 157. 
CPl. 

Intercambio programas MSX. 
Envíame tus programas en una 
cinta y en poco tiempo la recibi- 
rás con los míos. Poseo gran va- 
riedad y de los buenos. Javier Sa- 
la. C/. Les Corts, 52, 3." 4.\ 08028 
Barcelona. Tel. (93) 330 97 71. 
CPl. 

Para SVI 328. Deseo contactar 
con usuarios interesados o que 
posean software para la transmi- 
sión y recepción para la transmi- 
sión y recepción de CW-RTTY. 
Estoy muy interesado y pagaría 
software y gastos. Escribir al 
apartado 111 de Esparraguera. 
CP 08292 Barcelona EA3 - ENT. 
CPl. 

Cambio/vendo programas para 
MSX. Tengo los mejores en cali- 
dad y rapidez. Pide lista a Miguel 
Moreno. C/. Cataluña, 48, 3." 2.\ 
El Prat de Llobregat. CPl . 
Intercambio juegos de MSX. 
Preguntar por Jordi. Tel. (93) 
211 87 15. C/. Betania, 11, 4." 2.' 
(Barcelona). CPl. 
Intercambio programas. Mánda- 
me a una cinta cargada y recibirás 
otra grabada con otros distintos. 
Jesús Zamora Rodríguez. Avda. 
de Colón, portal D, 3." F. ALBO- 
LOTE (Granada). CPl. 



Intercambio juegos para MSX. 
Poseo más de 80 títulos, entre 
ellos gran cantidad de programas 
formato cartucho para' cassette 
como los de KONAMI. Llamar 
al n." (983) 39-30-87 o escribir a 
C/. Acibeías, n." 15, 6." derecha 
(47004 Valladolid). Preguntar por 
Luis. Prometo contestar a toaos. 
CPl. 

Intercambio programas MSX. 
Primeros títulos del mercado. 
Club Orippo. C/. Cristo de la 
Vera, 36. Dos Hermanas (Sevilla). 
CPl. 

Escríbenos: SADA club MSX. 
Todo tipo de software. Cursos de 
BASIC avanzado, trucos, etc. 
Infórmate sin compromiso. Se 
contesta rápido y a todos. Diri- 
girse a Santo Arias. C/. Peña Lar- 
zón, 55. León. CP. 24008. CPl. 
Intercambio programas MSX. 
Mandar lista a Juan M. Rial. El 
Romeral, 08. Alfaz del Pi (Ali- 
cante). Si me mandas una cinta 
con programas os la devolveré 
con otros programas. CPl. 1 
Intercambio programas. Dispon- 
go de más de 150 títulos. Mandar 
lista a Eduardo Bosch Obiol. C/. 
Ramón y Cajal, 53, 3." 2.'. 12005 
Castellón. Tel. (964) 211087. 
CPl. 

Intercambio y vendo programas 
MSX. Primeros títulos del merca- 
do. Llamar a Francisco al (954) 
630 914 de Sevilla de 19 a 20 ho- 
ras. CPl. 

Vendo SONY HB 55P y cartu- 
cho de juegos BATTLE CROSS 
por 30.000 ptas. Compro cartu- 
cho de ampliación a 64 K por 
9.000 ptas. y cartuchos de juegos. 
Escribid a: Angel Vicente Moli- 
nero. C/. Bolivia, 56-58. Tel. 
(976) 314 622. Zaragoza. CPl. 
Intercambio o vendo programas 
MSX. Poseo bastantes y muy 
buenos me interesan juegos, len- 
guajes, etc. Prometo contestar. 
Interesados mandar lista o llamar 
a José L. RUS. C/. Colón, 27, 2." 
A. Granollers (Barcelona). Tel. 
(93) 870 97 75. CPl. 
Vendo/Intercambio programas 
MSX. Tengo entre otros Knigth 
Lore, Alien 8... Interesados escri- 
bir a Ibán Triado. C/. Martorell, 
59, 2." 4.'. Sant Cugat (Barcelona). 
CPl. 

Cambio ordenador SPECTRA- 
VIDEO SVI 738 con unidad de 
disco incorporada por unidad de 
disco Mitsubishi (ML-30FD) de 
3'5". Tengo garantía del SVI 738 
hasta Diciembre 1986. Incluyo 
discos MSX-DOS y CP/M. 
Intercambio/vendo programas 
MSX en cinta o diskette 3 '5" jue- 
gos y gestión. Interesados poner- 
se en contacto con Jordi Arias 
Ruiz. C/. Abat Escarre, 20-22, 3." 
I.' S. Boi. Barcelona. CPl. 



Intercambio programas en cas- 
sette preferiblemente juegos con 
chicos y chicas de toda España. 
Poseo más de 60 títulos. Si que- 
réis ponerse en contacto conmi- 
go, escribid a C/. Joaquim Vayre- 
da, 63, 6." 1/ 17001 Girona o lla- 
mad al (972) 207 837 y preguntad 
por Xcvi. CPl. 

Cambio programas y juegos 
MSX sin fin económico. Mandar 
lista, contestaré a todos. José Mi- 
guel Gil. Aptdo. 2108 Burgos. 
CPl. 

Vendo/Cambio programas MSX 
con usuarios de Barcelona. Poseo 
todos los programas en cinta y 
son últimas novedades. Preguntar 
por Carlos 422 66 76. CPl. 
Gran Oferta. Cambio cinco pro- 
gramas de Konami (Yie Ar Kung 
Fu, CIRCUS CHARLIE, SOC- 
CER, BOXING y ROAD 
FIGTHER) por cartucho de am- 
pliación a 64 K o por 7.000 ptas. 
Se responderá a todas las cartas 
(ooner teléfono). José A. Linares. 
C/. Chafarinas, 2. Roquetas de 
Mar. Almería. CPl. 
Vendo o intercambio juegos co- 
merciales a 2.000 ptas. Interesa- 
dos escribir a Juan José. Apartado 
20039 Badajoz. CPl. 
Intercambio o vendo juegos. 
Víctor M. Moreno Giménez. C/. 
Larga, 44. Puerto de Santa María 
(Cádiz). CPl. 

Intercambio programas MSX. 
Dispongo de más de 150. Intere- 
sados ponerse en contacto con 
Juan A. López Cierra. C/. Riera 
Blanca, 158, 4." 2.'. Tel. (93) 
431 15 63. L'HOSPITALET 
(Barcelona). CPl. 
Cambio juegos MSX por otros. 
Amplio catálogo. Angel Peña. 
Obispo Basulto, 95. TORREPE- 
ROGIL. Tel. (953) 776 024. 
Intercambio programas. Poseo 
250 primeros títulos. Escribid a 
Javier Cabrera López. Z. R. Los 
Angeles, l."4A Estcpona (Málaga) 
o llamad al (952) 803 380. CPl. 
Vendo o cambio programas para 
MSX. Dispongo de títulos tan 
buenos como GUNFIGH, 
NIGHT SHADE, ALIEN 8, 
PROFANATION, etc. También 
quiero formar un club. Escribir a: 
Antonio J. García Martínez. Ca- 
mino de Ronda, 38, 1." D. Grana- 
da 18005. CPl. 

Intercambio juegos. Carlos Mag- 
daleno Verdes. c/Calderón de Ta 
Barca 10, Valladolid. Tel. (983) 
257467 (no llamar fines de sema- 
na). CP2. 

Intercambio programas MSX. 
Gonzalo Uncilía. c/San Francisco 
13, 3", Durango (Vizcaya) y Gui- 
llermo Alberdi c/Bernardo Ga- 
biola 2" 4" Cha. Tel. 6811521 o 
6810773. CP2. 

Compro/vendo cartuchos MSX. 
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Pilar López. c/Honduras 5, 7E, 
Vitoria (Alava). CP2. 
Intercambio programas MSX, 
MS-DOS y CP/M en discos 3, 5". 
Me interesa programa MS-BASE 
IDS intercambiable por MS 
TEXT IDS. José M. Greoles. 
Apdo. 62. 25080 Lleida. CP2. 
Intercambio programas MSX en 
Basic o CM en cinta o disco. Ale- 
xis de Castellón. Tel. (964) 
203486. (De 8,30 a 10 hs.) CP2. 
Intercambio programas MSX. 
José Luis Hernández. c/Sol 26, 
Peñarroya Puo (Córdoba). Tel. 
(957) 560995. CP2. 
Intercambio programas MSX. 
Juegos o de gestión. Angel Peña. 
c/O. Basulto 95, Torreperogil 
Qaén). TeL (953) 776024. CP2. 
Intercambio programas MSX. 
Juegos, gestión, educativos, apli- 
caciones. Carmelo González 
García. c/Industrias 35, 5" C. 
47005 Valladolid. Tel. (983) 
294592. CP2. 

Contacto con usuarios Yamaha 
CX5M o CX5M II p/intercambio 
de programas. Jenaro Sánchez Vi- 
llegas. c/Iglesia 168, 5" C. Ferrol 
15402 (La Coruña). CP2. 
Vendo Hit Bit 55P y regalo un 
catucho y una cinta de juegos y 
varias cintas vírgenes. Precio 
40.000 ptas. Jorge Javier Cantó. 
Alcoy (Alicante). Tel. (865). 
522723. CP2. 

Vendo Hit Bit 55P, ampliación 
de memoria 64K y 14 interesantes 
juegos. Todo por 50.000 ptas. 
David Butxaca Gros. Serra Casa 
en Pons, 48. 08600 Berga (Barce- 
lona). Tel. (93) 821 1540. CP2. 
Intercambio Tenis, Hunchbach, 
Hero, Stop the Train, Gyro 
Aventure, etc. por un cartucho de 
ampliación de 16K o 64 K. p/orde- 
nador de 48K. Ricardo Enríquez. 
Plaza Ceramista Gimeno 7, 5". 
Pta. 25. Tel. 3345041. Valencia. 
CP2. 

Contacto usuarios Spectravídeo 
318/328 p/intercambio de ideas, 
programas, trucos, etc. Quiero 
Formar un club. Francisco J. Dá- 
vila Couto. c/Petis 32, 1". Bueu 
(Pontevedra). CP2. 
Vendo Sony HB55P c/cables, 
manual en español y caja de 
embalaje original. Casi nuevo. 
Precio 15.000 ptas. Daniel Díaz 
Sañudo. Sevilla. Tel. (954) 
705633. CP2. 

Contacto con usuarios MSX. 
Hazte socio del club CMIP por 
300 ptas. Envía tu dirección y 
participa en nuestros concursos 
mensuales. Antonio Javier García 
Martínez. Camino de Ronda 38, 1" 
D. 18005 Granada. CP2. 
Vendo Hit Bit 101 HP Sony por 
15.000 ptas. Manuel, de Mollet 
(Barcelona). Tel. (93) 5936063. 
CP2. 

Intercambio juegos en cinta y 
cartucho. Antonio Cueto. c/Ma- 
dre Isabel Moreno, 10, 6" B. 41005 
Sevilla. Tel. (954). 630186 (19 a 20 
hs.). CP2. 

Intercambio juegos MSX. Man- 
dar lista. José María Ros. Avda. 
de la Fama. Edif. Rodas 1" A. 
30006 Murcia. CP2. 
Intercambio juegos. Jordi Codi- 



na. c/Bilbao 11, 4" 3". Manresa 
(Barcelona). Tel. (93) 8734135. 
CP2. 

Vendo cartucho ampliación de 
memoria 16K. Sony HBM16. 
Precio 4.000 pts. Perfecto estado. 
Angel Lafuente. c/Alférez Provi- 
sional, 14". 42003 Soria. CP2. 
Cambio/vendo Decathlon y Su- 
per Chess originales por otros 
juegos también originales. Miguel 
Borrego. c/Abad Racimir 11. 
Olot (Girona). CP2. 
Intercambio programas e ideas 
c/usuarios MSX. Poseo La Pulga 
Flight Path 737, Ultra Chess, Air 
Mission, etc. Cristian Freitag. c/ 
Fabra y Puig 67. 08030 Barcelona. 
CP2. 

Cambio cartucho de ampliación 
64K. Sony o SVI por una serie de 
juegos, entre ellos Alien 8, HE- 
RO, Manic Miner, Maciac, etc., 
más 4.000 ptas. en metálico. Es- 
cribir al Apdo. 342 Vitoria (Ala- 
va). CP2. 

Vendo ordenador MSX 80K c/te- 
clado profesional y numérico y 
monitor color de media resolu- 
ción c/realce color y filtro de 
contraste y antiradiación. José Jo- 
aquín. Tel. (91) 7058831. CP2. 
Vendo Spectravídeo SVI 328, da- 
ta Cassette SVI 904, Coleto vi- 
sión, Game Adaptor SVI 303, 
Quickshot III, cartucho Zaxxon 
p/Coleco, gran número de cartu- 
cho y cintas. Todo en buen estado 
por 55.000 ptas. Acepto ofertas. 
Daniel Nebot. c/Sol i Padrís 
96-98, 8" B. Sabadell (Barcelona). 
Tel. (93). 7107405. CP2. 
Contacto con miembro del Club 
usuarios MSC para información. 
Josep Sais i Mascoprt. La Torre. 
Campllong (Gerona). CP2. 
Cambio 32 juegos de revistas y 32 
comerciales por un cartucho de 
ampliación de 64K de cualquier 
marca. Posible acuerdo de com- 
pra. Jesús Contreras Luna. c/An- 
gelita Capdeville 5, 3" Izq. 10002 
Cáceres. Tel. (927) 223819. CP2. 
Intercambio programas, ideas. 



dudas y experiencias. Ricardo Jo- 
sé Durán Carrasco. c/Las mora- 
das, 36 3" B. 47010 Valladolid. 
CP2. 

Intercambio programas MSX. 
Poseo muchos juegos en cartu- 
cho. Prometo responder. Miguel 
A. Martín. c/Oleta 42, 5" D. Bara- 
caldo (Vizcaya). CP2. 
Vendo Data Cartrige p/Sony 
HB55P/HB75P/HB75B cuya 
función es el almacenaje de datos. 
Precio 3.000 ptas. Feo. José Sala- 
zar. Tel. (480). 4670872. CP2. 
Contaco usuarios MSX de Ali- 
cante. Soy novata. Espero vues- 
tras cartas. Noelia Dechent. Ap. 
2154. 03013 Alicante. CP2. 
Contacto p/iniciarme en el ma- 
nejo del Philips MSX. Pido con- 
sejos y programas sencillos. No 
quiero basarme sólo en instruc- 
ciones. Guillermo Celda Casano- 
va. c/Sangunto 67. 46009 Valen- 
cia. CP2. 

Contacto c/usuarios MSX del 
planeta p/intercambio de progra- 
mas e ideas. Contestaré a toaos. 
Xosé Lloves. Av. García Barbón 
156, 7" A. 36021 Vigo. Tel. (986) 
439193. CP2. 

Intercambio programas. Contes- 
taré a todos los colegas que escri- 
ban. Victoriano Rodríguez Dávi- 
la. Lepanto 2, Bajo Dcha. Conil 
de la Frontera (Cádiz). CP2. 
Compro programas de gestión en 
disco de 3,5" en CP/M 2.2. Escri- 
bir dando detalles y precio. Ma- 
nuel López Cuesta. Puentelarra 
18. 28031 Madrid. CP2. 
Vendo Sony Hit Bit 55P, más 
cartucho ampliación de memoria, 
más cartucho de juego Crazy 
Train, más 9 libros y 30 juegos 
comerciales. Todo por 45.000 
ptas. Oscar Guillen. c/Enrique 
Salas s/n. Abchena (Murcia). 
CP2. 

Intercambio juegos MSX. Man- 
dar lista. José Antonio Otero 
Couselo. c/Fraga do Rei 34. 
Arzua (La Coruña). Tel. (981) 
500016. CP2. 



Cambio Zakil Wood, Rana Side- 
ral y Gusano Loco por H.E.R.O. 
Juan Vidal. c/Mallorca 451, 6-2, 
A. 08013 Barcelona. CP2. 
Compro programs de juegos y 
educativos p/Spectravídco 
328/318. Prometo responder. 
Ignacio Montero Araque. c/Co- 
bíanca 26, Esc. G, 9" 1 8. Benidorm 
(Alicante). CP2. 

Intercambio juegos. Mándame tu 
lista y te mandaré la mía. Montse 
Zayas Salvat. c/San Marcos 8, 4" 
3 J . Badalona (Barcelona). CP2. 
Cambio Soccer, Boxeo, Manic 
Miner, H.E.R.O., etc. por cartu- 
cho de ampliación de memoria de 
16 o 64K. Juan Manuel Otero 
Couselo. c/Fraga do Rei 34. 
Arzua (La Coruña). Tel. (981) 
500016. CP2. 

Compro o cambio por juegos 
ampliador de memoria de 64K. 
Juan M J Gorrotxategui, Guipúz- 
coa 16, 4" C. Ordizia (Guipúz- 
coa). Tel. (943) 885474. CP2. 
Vendo ampliación de memoria 
64K p/SVI 747 o cambio por car- 
tucho Logo Philips o juegos. 
También vendo o cambio por 
unidad de disco MSX emisora Pa- 
lomar SS/3500 c/40 canales por 
banda, c/medidor, fuente de ali- 
mentación, dos antenas. Jesús 
González Callejas. c/Alpes 41, 6" 
4 J . L'Hospitalet de Llobregat 
(Barcelona). Tel. (93) 3384171. 
CP2. 

Vendo Spectravídeo SVI 328. In- 
cluyo cassette, mandos de juego, 
televisor portátil Philips b/n, pro- 
gramas y libros. Todo por 60.000 
ptas. Carlos, de Avila. Tel. (918) 
228896. CP2. 

Vendo impresora Brother 50 cps. 
cable paralelo incluido. Casi sin 
uso. Precio 45.000 ptas. Xavier, 
de Barcelona. Tel. (93) 2132672. 
CP2. 

Vendo Philis VG 8010. Incluyo 
20 revistas, varios libros, más de 
100 juegos (algunos en cartu- 
chos), joystick Quickshot I, 42 
fascículos del curso Basic softwa- 
re. Todo 30.000 ptas. Juan Carlos 
de la Llana Santos. c/Lleona 12. 
Reus (Tarragona). CP2. 
Cambio dos programas por uno 
de estos cuatro: Hero, Ninja, Bo- 
oga Boo o Pyramid Warp. Agus- 
tín Obradors. c/Mayor 68. Prats 
de Llusanes (Barcelona). CP2. 
Vendo Philips VG8020 80K, muy 
nuevo. Buen Precio. Alberto 
Martínez Correro. c/Palencia 
27-29 esc. A 8°, 3 J . 08027 Bacelo- 
na. CP2. 

Compro toda clase de cartuchos 
(juegos, utilidades, ampliaciones, 
data cartridges, etc.). José Ignacio 
de Basauri. Tel. (94) 4494685. 
CP2. 

Vendo HIT BIT 101 P con poco 
uso. Javier. Llamar entre 16 y 21 
hs. al Tel. (93) 3099085. CP2. 
Vendo HB 75P Sonv, 80K en 
perfecto estado, c/cabfes, manua- 
les y unos 60 programas por 
45.000 ptas. Opción a grabadora 
Bitcorder SDC-500. Salvador 
Roura. Pje. Ensesa 7, Pral. 2\ 
25200 Cervera (Lérida). Tel. (973) 
530781 (16 a 18 hs.). CP2. 





Programa 



MINUETO EN 
LA MENOR 

I 10 REM ########################### 
20 REM ### MINUETO EN LA MENOR ### 
30 REM ### DE JOHANN S. BACH tttttt 
40 REM ### VERSION DE tttttt 

50 REM tttttt ANTONIO V.SANCHIS tttttt 
60 REM tttttttttttttttttttttttttttttttttttttttttttttttttttttt 
100 COLOR 1 , 2, 15 
110 SCREEN 2 
120 OPEN"GRP: "ASttl 
130 L'INE (10, 10) - (245, 180) , 1 , B 
140 LINE(12, 12) -(243, 178) , 15, B 
150 PRESET (23, 30) : PRINT#1 , "EL PEQUE 
fóD LIBRO PARA ORDE-" 

160 PRESET (23, 40) :PRINT#1, "NADOR DE 

ANA MAGDALENA BACH" 
170 PRESET (90, 65) : PRINTttl, "J.S.BACH 

180 PRESET (85, 80) :PRINT#1, "1685-175 
O" 

190 PRESET (23, 150) : PRINTttl , "Minueto 

en La menor .( Canon ) 
200 PRESET ( 55 , 95 ) : PR I NTtt 1 , " - I I I CEN 
TENAR IO-" 

210 FOR X=l TO 2000: NEXT 
220 CLS 

230 COLOR 1 , 10, 15 

240 PRESET (23, 80) : PRINTttl, "Versión 
para ordenador de" 

250 PRESET (23, 100) : PRINTttl, "Antonia 

V. Sanchis Girbes" 
260 FOR 1=1 TO 2000: NEXT 
270 GOSUB' 640 

280 PL A Y " T 1 20L 1 604EER 1 6R 1 6AA AB05CCC 
R 1 604BBR 1 6R 1 6 " , " T 1 20R 1 6R 1 6R 1 6R 1 6R 1 6 
R16R16R16R1 6R 1 6R 1 6R 1 6L 1 603EER 1 6R 1 6 " 
290 PLA Y " T 1 20L 1 605CCCC04AAAR 1 6 " , " T 1 
20L 1 603AAAB04CCCR 16" 

300 PLA Y " T 1 20L 1 605EEEEEEER 1 6EEDDCC0 
4BB05CCCC04 AAAR 1 605FFFFFFFR 16" , "T12 
0L 1 603BBR 1 6R 1 604CCCC03 AAAR 1 604EEEEE 
EER 1 6EEDDCC03BBAAAR 1 6 " 

310 PLAY"T120L16O5EEEED+D+D+R16" , "T 
1 20L 1 603AAAR 1 6AAAR 16" 

320 PLAY " T 1 20L 1 605EEEE04BBBR 1 605EEE 
EEEER16" , "TI 20L 1 603G+G+G+R 1 6G+G+G+R 
16G+G+G+R16GGGR16" • 

330 PLAY "TI 20L 1 605DDDDC+C+C+R 1 6DDDD 



Por Antonio U. Sanchis™ 



Esta preciosa composición a canon 
de J. Sebastian Bach da la medida de 
lo que puede hacer en el terreno del 
sonido un ordenador de la norma 
MSX. A los amantes de la música 
les entusiasmará la interpretación y 
— esperemos — les anime a realizar 
sus adaptaciones. 

04 AAAR 1 605DDDDDDDR 1 6CCCC04BBBR 1 605C 

CCC04GGGR 1 6 " , " T 1 20L 1 603GGGR 1 6GGGR1 6 

F+F+F+R 1 6F+F+F+R 16F+F-+F+R 1 6FFFR1 6FF 

FR 1 6FFFR 1 6EEER 1 6EEER 1 6 " 

340 PLAY " T 1 20L 1 605CCCR 1 604BB05CCDDÜ 

4BB05FF04 AA " , "TI 20L 1 603EEER 1 6DDDR 1 6 

DDDR16DDDR16" 

350 PLAY " T 1 20L4O4G+G+ " , "TI 20L 1 603EE 

ER1602EEER16" 

360 GOSUB 540 

370 PLAY " T 1 20L 1 604GGR 1 6R 1 605CCCDEEE 
R16DDDR16", "T120L16R16R16R16R16R16R 
1 6R 1 6R 1 6R 1 6R 1 6R 1 6R 1 603GGR 1 6 " 
380 PLA Y " T 1 20L 1 605EEEECCCR 1 6GGGGGGG 
R16GGFFEEDDEEEECCCR 1 6AAAAAAAR16" , "T 
1 20L 1 604CCCDEEER 1 6DDDR 1 6EEEECCCR 1 6G 
GGGGGGR 1 6GGFFEEDDCCCR 1 6 " 
390 PLAY " T 1 20L 1 605GGGGF+F+F+R 1 6GGGG 
DDDR1 6EER1 6R1 6FFFFDDDDDDDDCCCCCCCC" 
, "T120L16O4CCCR16CCCR 1603BBBBGGGR1 6 
04CCR 1 6R 1 603AAR 1 6R 1 6FFR 1 6R 1 6GGR 1 6R 1 
6CCR 1 6R 1 602CCR 1 6R 1 6 " 

400 PLAY " T 1 20L 1 605EEEEFFFFGF+GF+GF+ 
EF+GGGGDDDR 1 6F+F+F+F+GGGR 1 6AG+AG+AG 
+F+G+AAAAEEER 1 6AAAA" , "T120R16R16R16 
R16R16R16R16R16R16R16R16R16L1602AAA 
AB-B-B-R1603C02BAB03CCCC02BBBBEER16 
R 1 6BBBB03CCCCDC+02BQ3C+02AAAA " 
410 PLAY " T 1 20L 1 605FFR 1 6R 1 6EER 1 6R 1 6D 
DR 1 6R 1 6EEEE04EEER 1 6AAR 1 6R 1 6 " , " T 1 20L 
1 603DDR 1 6R 1 6EER 1 6R 1 6FFR 1 6R 1 6CCCCCCC 
CFFR16R16" 

420 PLAY " T 1 20L 1 605DDDDC04B05C04B05C 

04BABAAAAAAAA " , "TI 20L 1 603DDR 1 6R 1 6EE 

F: 1 6R 1 602EER 1 6R1 6AAAA AAAA " 

430 PLAY " T 1 20L 1 604GGR 1 6R 1 605CCCDEEE 

R 1 6DDDR 1 6 " , " T 1 20L 1 6R 1 6R 1 6R 1 6R 1 6R 1 6R 

1 6R 1 6R 1 6R 1 6R 1 6R 1 6R 1 603GGR 1 6 " 

440 PLAY " T 1 20L 1 605EEEECCCR 1 6GGGGGGG 

R16GGFFEEDDEEEECCCR16AAAAAAAR16" , "T 

1 20L 1 604CCCDEEER 1 6DDDR 1 6EEEECCCR 1 6G 

GGGGGGR 1 6GGFFEEDDCCCR 1 6 " 

450 PLAY "TI 20L 1 605GGGGF+F+F+R 1 6GGGG 

DDDR 1 6EER 1 6R 1 6FFFFDDDDDDDDCCCCCCCC " 

, " T 1 20L 1 604CCCR 1 6CCCR 1 603BBBBGGGR 1 6 

04CCR 1 6R 1 603AAR 1 6R 1 6FFR 1 6R 1 6GGR 1 6R 1 

6CCR 1 6R 1 602CCR 1 6R 1 6 " 



1 



O 




Programa 



460 PLA Y " T 1 20L 1 605EEEEFFFFGF+GF+GF+ 
EF+GGGGDDDR 1 6F+F+F+F+GGGR 1 6AG+AG+ AG 
+F+G+ AAAAEEER 1 6AAAA " , "TI 20R 1 ÓR 1 6R 1 6 
R 1 6R 1 6R 1 6R 1 6R 1 6R 1 6R 1 6R 1 6R 1 6L 1 6Ü2AAA 
AB--B-B— R 1 603C02BAB03CCCC02BBBBEER 1 6 
R 1 6BBBB03CCCCDC+02B03C+02AAAA " 
470 PLA Y " T 1 20L 1 605FFR 1 6R 1 ÓEER 1 6R 1 6D 
DR 1 6R 1 6EEEE04EEER 1 6AAR 16R16" , "TI 20L 
1 603DDR 1 6R 1 6EER 1 6R 1 6FFR 1 ÓR 1 6CCCCCCG 
CFFR16R16" 

480 PLA Y " T 1 20L 1 605DDDDC04B05C04B " , " 

T 1 20L 1 603DDR 1 6R 1 6EER 1 6R 1 ó " 

490 PLAY " T 1 00L 1 605C04B " , " T 1 00L 1 602E 

E " : PLAY " T90L 1 604ABAAAAAAAAAAAA " , " T9 

0L 1 6D2R 1 6R 1 6A AAA A AAAAAAA " 

500 FOR 1=1 Tü 3000: NEXT: CLS: PSET (2 

5,50) :PRINT#1, "En 1985 se cumplen t 

ambien" : PSET (25, 65) : PRINTttl , "300 añ 

os del nacimiento de": PSET (80, 95) : P 

Rllsrrti , " G . F . HAENDEL " 

510 L I NE (10, 10) -(245, 180) , 13,B:LINE 
(12, 12)-(243, 178) , 15, B 
520 FOR W«4 Tü 4000: NEXT: CLS 
530 CLÜSE #1:SCREEN 0: KEY GN: END 
540 PLAY " T 1 20L 1 6Ü4EER 1 6R 1 6 AAAB05CCC 
R 1 6Ü4BBR 1 6R 1 6 " , " T 1 20R 1 6R 1 6R 1 6R 1 6R 1 6 
R 1 6R 1 6R 1 6R 1 6R 1 6R 1 6R 1 6L 1 603EER 1 6R 1 6 " 
550 PLAY " T 1 20L 1 605CCCCÜ4A AAR 1 6 " , " T 1 
20L 1 603 AAABG4CCCR 1 6 " 

560 PLAY " T 1 20L 1 6Ü5EEEEEEER 1 6EEDDCCÜ 
4BBÜ5CCCC04AAAR 1 605FFFFFFFR 1 6 " , " T 1 2 
0L 1 6G3BBR 1 6R 1 604CCCC03AAAR 1 ÓQ4EEEEE 
EER 1 6EEDDCC03BBAAAR 1 6 " 
570 PLAY"T120L16O5EEEED+D+D+R16" , "T 
1 20L 1 603AAAR 1 6 AA AR 1 6 " 




580 PLAY " T 1 20L 1 605EEEE04BBBR 1 6Ü5EEE 
EEEER16" , "T120L16O3G+G+G+R16G+G+G+R 
16G+G+G+R16GGGR16" 



590 PLAY " T 1 20L 1 605DDDDC+C+C+R 1 6DDDD 
04AAAR 1 6G5DDDDDDDR 1 6CCCC04BBBR 1 605C 
CCCÜ4GGGR 1 6 " , " T 1 20L 1 Ó03GGGR 1 6GGGR 1 6 

F+F-+-F+R 1 6F+F+F+R 1 6F+F+F+R 1 6FFFR 1 6FF 
FR 1 6FFFR 1 6EEER 1 6EEER 16" 
600 PLAY " T 1 20L 1 605CCCR 1 604BB05CCDDÜ 
4BB05FF04AA " , "TI 20L 1 603EEER 1 6DDDR 1 6 
DDDR 1 6DDDR 16" 

610 PLAY"T120L4O4G+G+", "T120L16O3EE 

ER1602EEER16" 

620 RETURN 

630 GÜSUB 370 

640 COLOR 1, 10, 15 

650 SCREEN 2 

660 L I NE ( 1 , 1 ) - ( 245 , 1 80 ) , 1 , B 
670 LINE(12, 12) -(243, 178) , 15, B 
680 PRESET ( 23 , 30 ) : PR I NT# 1 , " EL PEQUE 
ÑO LIBRO PARA ORDE-" 

690 PRESET (23, 40) :PRINT#1, "NADOR DE 

ANA MAGDALENA BACH" 

700 PRESET (90, 65) :PRINT#1, "J.S.BACH 
ii 

710 PRESET (85, 80) :PRINT#1, "1685-175 
O" 

720 PRESET (23, 150) :PRINT#1, "Minuete. 

en La menor .( Canon ) 

730 PRESET (55, 95) :PRINT#1, " -III CEN 
TENARIO-" 

740 FOR X=l TO 1000: NEXT 

750 RETURN 

760 GOSUB 220 



TEST DE LISTADOS. Para usar el Test de Listado que publicamos al final de cada programa debe cargarse el programa 
correspondiente publicado en nuestro número 7 del mes de noviembre, pág. 28. programa 



Test de Listado 



iMinueto en la menori 



10 


- 


1 50 


-251 


260 


-102 


370 


- 63 


480 


- 73 


590 


-138 


700 


-112 


20 


- 


160 


- 98 


270 


- 29 


380 


- 58 


490 


-220 


600 


-253 


710 


- 96 


30 


- 


170 


-112 


280 


-214 


390 


~ 65 


500 


-129 


610 


-240 


720 


- 73 


40 


- 


180 


- 96 


290 


-196 


400 


-139 


510 


-208 


620 


-142 


730 


-129 


50 


- 


190 


- 73 


300 


- 92 


410 


-192 


520 


- 20 


630 


- 14 


740 


-120 


60 


- 


200 


-129 


310 


-193 


420 


-229 


530 


- 79 


640 


- 94 


750 


-142 


1 00 


- 88 


210 


-100 


320 


-160 


430 


- 63 


540 


-214 


650 


-216 


760 


-119 


1 10 


-216 


220 


-159 


330 


-138 


440 


- 58 


550 


-196 


660 


- 64 




120 


-224 


230 


- 94 


340 


-253 


450 


- 65 


560 


- 92 


670 


~ 76 






130 


- 64 


240 


- 70 


350 


-240 


460 


-139 


570 


-193 


680 


-251 


TDTAI : 


140 


" 76 


250 


-202 


360 


-185 






580 


~ 160 


690 
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Programa 



■hhbhh Por Manuel Adrerái 



4 EN RAYA 



Curiosa adaptación del popular 
juego de tablero nos brinda tres 
opciones que son: Jugar contra el 
ordenador; contra otro jugador 
o el ordenador contra nosotros. 
Cada opción (excepto entre usua- 
rios) tiene 2 niveles. ¿A que no 
ganas? 




10 REM ************************ 



CUATRO EN RAYA 



** 
** 
** 
** 
** 



20 REM ** 
30 REM ** 
40 REM ** 

50 REM ** by Manel Adserá 
60 REM ** TARRAGONA 1936 
70 REM ************************ 
80 REM 
90 REM 

100 CLS-.KEY OFF : DEFIMT A»Z : RN=RND ( - 
TIME) 

110 GOSUB 1610 
120 GOSUB 1390 

130 REM ** INICIALIZA VARIABLES *** 
* 

1 40 D I M Y ( 1 1 ) 
150 DI M PLKU) 

160 FOR N=4 TO 1 1 s Y (N) -"4; NEXT 
170 DIM P ( 14. 14) 

180 REM ** BUCLE "M" DE RUTINA PRIN 
. * 

190 FOR M=l TO 56 

200 IF JR<3 THEN GOSUB 1250 ELSE GG 
SUB 630: REM ** JUEGA JUG. '2500) O 
MAQ . (1300) *********************** 
***** * * * 

2 1 COLOR 1 5 s PRESET ( 25 a ) . 1 5 : PR I NT 

#1, IIIIIIIIIIIIIIBIIIISIIIII' 1 :COLO 
R i 

220 P (X. Y (X) ) = JR 

230 GOSUB 390 s REM ** COMP. JUGADA * 



* 

240 
250 
2' 60 
270 
1 .2 
2S0 
290 
í 



Y=Y'X> -3: Z=X-3 

REM ** MARCA JUGADA ***** 
IF ' JP=1 THEN C>, i i n:LSE OS 
Q1RCLE 117424* 2 , 1S2-1S*Y) ,3,0,,,, 
PAINT í 17-t24*Z , 182- 13* Y) , C 
BEEP 

IF" pi=4 THEN BEEP s PRESET (25,0) , 
PRINTttl , "OTRA PARTIDA (S/N) ? " : A$ 



=INKEY*: IF A*< > 
A*:=" E " THEN RUN 
ND ELSE 290 5 REM 

300 Y(X)=Y(X)+1 

310 SWAP JR.JJ 

320 NEXT 

330 P 1 "4 : GOTO 290 

340 END 

350 REM 

360 REM 

370 REM 

380 PEM 

3f?0 H=Y(X) 

400 P1=0 

410 FOR E* 

420 I F P r X +-C 

LSE P;1«0 

430 IF Pl 

440 NEXT 

450 Pl=-0 

460 FOR C 
470 



" THEN IF A$= M S"OF: 
ELSE COLOR 15,4,4:E 
** VICTORIA *** 



SUBRUT . CDMPROVAC I ÜM 



•3 TO 3 
H+C) 



:JR THEN PÍ=P1 + 1 E 



4 THEN RETURM 



3 TO 3 
IF P (X--C H) =JR THEN 




Pl-Pl+1 ELS 



Programa 








E P1=0 

480 IF Pl-4 THEN RETURN 
490 NEXT 

500 P1=0 

510 FÜR C=-3 Tü 3 

520 IF P (X+C, H-C) -JR THEN Pl-Pl+i £ 
LSE P1=0 

530 IF Pi«4 THEN RETURN 
540 NEXT 

550 Pl-0 

560 FÜR C-4 Tü l-l 
570 IF P(X,C)-JR 
P1=0 

580 IF Pl=¿4 
590 NEXT 
600 RETURN 
610 REM 
620 REM 
630 REM. 
640 REM 

650 PRESET ( 25 ,0),15i PR I NT # 1 , " ESTOY 

PENSANDO" 
660 IF P(7,4)-0 THEN X =7: RETURN 
670 IF P(3 ! ,4)-0 THEN X =8: RETURN 
680 FÜR N=4 TO 1 1 : PU ( M ) =0 s NEXT 
690 FOR X-4 Tü 11:Y-Y(X) 
700 IF Y>10 THEN PU ( X ) =-300 s NEXT : GO 
Tü 750 

710 P(X,Y)=3 
720 GOSUB 390 

P ( X , Y ) =0 : I F P 1 =4 THEN RETURN 
NEXT: BEEP 



THEN P1=P1+1 ELSE 
THEN RETURN 

JUEGA MAQUINA 



JFMl 

FOR X-4 TO i i 
IF PU(X)=-300 



THEN NEXT : GOTO 83 



1 



Y=YQO :P(X, Y) 
GOSUB 390 
P(X, Y)-0 

IF Pl-4 THEN JR-3: RETURN 

NEXT : BEEP 

JR-3 

FÜR X=4 TO u: BEEP 

IF PUm — -300 THEN NEXT X 



GOTO 



730 

740 

750 
760 
770 


780 
790 
800 
8 1 
820 
830 
840 
850 
1040 

860 Y-Y(X> í P(X, Y) =3 
870 IF Y(X) > 10 THEN 
:NEXT X 5 SOTÓ 1040 
380 JR-1 : P ( X, Y+l ) =1 
890 GOSUB 390 
900 P ( X „ Y+ 1 ) =0 s JR=3 

910 IF PÍ=4 THEN PU ( X ) — 1 00: P « X , Y) - 
0: Y(X)-Y:NEXT X : GOTO 1040 
920 IF NI-0 THEN Y ( X ) -Y : P ( X » .Y ) =0 a NE 
XT XrGOTO 1040 

930 SS=0:FÜR XS«4 Tü 11: IF Y(XS)M0 

THEN NEXT XS:GOTQ 960 
940 XZ = X;P(XS.,Y(XS) ) =3; X-XS; GOSUB 3 



Y <X) -Y+l 
Y(X)=Y:P(X. Y>=0 



950 
960 



90:X=XZ: IF Pl-4 AND Y<XS)+1<11 THEN 

P ( XS , Y ( XS ) + i ) =3 S Y ( XS) -Y ( XS ) + 1 : X Z-X 

: X-XS: GOSUB 390: X-X 2 : Y ( XS ) -Y '( XS ) -1 s 

P ( X S , Y ( X S ) + 1 ) -0 : I p Pi=: 4 THEN SS-2 F 

LSE SS-SS+1 

P'XS, Y(XS) )-0:NEXT XS 

IF SS>1 THEN Y(X)-Y:P(X, Y)-0:RE 
TURN 

970 IF SS=1 THEN PU ( X ) -PU ( X ) -3 
980 J R= 1 : SS-0 : P ( X , Y ) = 1 

990 FOR XS-4 TO 11: IF Y(XS)>10 THEN 

NEXT XS: JR-3: GOTO 1020 
1000 P(XS, Y(XS) )«ls XZ-X: X-XS: GOSUB 
390:X=X2:IF Pl¿4 AMD Y(XS>+1<11 THE 
N P ( XS, Y ( XS) +1 ) m i : Y ( XS) -Y ( XS) + i,i XZ = 
X: X-XS: GOSUB 390: X-XZ: Y (XS) =?Y (XS) -1 



:P(XS, Y(XS)+1)=0: IF 
ELSE SS-SS+1 



Pl-4 THEN SS< 



1 1 
1 020 
1 030 
1040 



Y (XS) ) «0: NEXT XS 



1050 



-1, Y) 

1080 
-P (X- 
1 090 
„ Y- 1 ) 
1 100 



P (XS 

I F SS > 1 THEN PU ( X ) -PU ( X ) +50 
P<X,Y)=0s Y(X)=Y:MEXT 
FOR X«4 TO 11:Y=Y(X) 
PU ( X ) -PU ( X ) +P ( X- 1 , Y+ 1 ) 4R ( X- 1 , Y 

) +P ( X - 1 , Y- 1 ) +P ( X , Y 1 ) +P ( X + 1 , Y-- 1 ) +P ( 

X + l ¡ Y) +P (X + l , Y+l ) 

1 060 I F P ( X - 1 , Y- 1 ) >0 AMD P ( X ~2 , Y-2 ) 
=P ( X- 1 , Y- Í ) THEN PU ( X ) -PU ( X ) +3 

1070 IF P(X 1,Y)>0 AND P(X-~2 H Y)-P(X 

THEN PU(X)-PU(X)+3 
I F P ( X- 1 , Y+ 1 ) >0 AND P ( X-2 , Y+2 ) 
1 , Y+ 1 ) THEN PU ( X ) -PU ( X ) +3 
I F P ( X , Y- 1 ) >0 AND P ( X i Y-2 ) «P ( X 

THEN PU(X)-PU(X)+3 
IF P <X+3 . Y-l ) >0 AND PÍX+2.Y-2) 
=P ( X + 1 , Y- 1 ) THEN PU ( X ) ¿PU (I ) +3 
1 1 1 I F P ( X + 1 , Y ) >0 AMD P ( X +2 , Y ) -P ( X 
+ 1 , Y ) T H E N P U ( X ) = P U ( X ) + 3 
1 1 20 I F P ( X + 1 , Y+ 1 ) >0 AMD P(X+2, Y+2 ) 
=P (X+l, Y+l) THEN PU ( X ) -PU ( X ) +3 
1130 NEXT 

1140 PU ( 7 ) -PU ( 7 ) +3 : PU ( 8 ) -PU ( 8 ) +3 
( 6 ) -PU ( 6 ) +2 : PU í 9 ) -PU ( 9 ) +2 : PU ( 1 ) 
(1#> + .L s PU (5) -PU (5) tí 
1150 TT— -1000 
1160 FOR N-4 TO 11 

1170 IF PU(N)>TT THEN TT-PU(M):X=M 
í 180 I F PU ( M ) -TT AND I NT ( RMD ( 1 ^ *2 ) 
THEN TT-PU(N) : X-N 
1190 NEXT:JR=f3 
1200 RETURN 
REM 
REM 

REM JUEGA JUGADOR 

REM 

PRESET (25,0) , 15:C0L0R 1 
PRIMT #1,"USTED JUEGA . HUMANO . 



PU 
=PÚ 



Í210 
1220 
1230 
1 240 
1 250 
1260 



1270 BEEP 
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1 280 
1 290 
EN Í 
i 300 
1 3 1 
1 320 
1330 
1340 
1350 
1 360 
1.370 
1380 
1 390 
1400 
í 410 
1420 
1430 
1440 
1 450 
1460 
1470 
1430 
1 490 
1 500 
1510 
1520 
1530 
#1 
1540 
NT#1 
1 550 
1560 



THEN 1280 
IF D>8 OR 



1 290 



IF INKEY$<>"" 
D=VAL ( INKEY*) 

IF Y ( D-i-3 ) >10 THEN 
PRINT ttl„D:BEEP 
FOR N-l TO 200 : NEXT 
X=D+3 
PETURN 
REM 
REM 

REM GRAFICOS 
REM 

SCREEN 2:ÜPEN "grp:" AS#1 



D<1 TH 



LINE<25,25)-<225, 188) , ., BF 
LINE<22,22)-<228, 191) , ,B 
FOR M=41 Tü 209 STEP 24 
FÜR N=56 Tü 164 STEP 18 
CIRCLE(M,N) ,8, 1, , , 1.2 
NEXT: NEXT 
COLOR 15 

FOR N=41 TO 209 STEP 24 
H=H+1 

PSET-N-S, 178) ,2: PRINT #1 , H 
NEXT 

IF JR=2 THEN 1560 

COLOR 9:PRESET(35,30> , 15: PRINT 
Máqui na" 
COLOR 11:PRESET(153,30) , 15:PRI 
"Humano" 
COLOR 1 
RETURN 



1570 
1580 
1 590 
1600 
1 6 1 
1620 
AYA" 
1630 
será 



REM 
REM 
REM 
REM 

SCREEN 
LOCATE 
BEEP 
LOCATE 
1 : BEEP 







PRESENTACION 



0: COLOR 2,1, 1 : CLS 

10, 10: PRINT "CUATRO EN R 

15, 20: PRINT"bv Manel Ad 



1640 FOR N=l 
1650 FOR N=rl 
1660 LOCATE 



TO 4000: NEXT 
TO 24: PRINT: BEEP: NEXT 
10,1 : PR I NT " 1 : Human q vs 
. máqui na" : BEEP 

1670 LOCATE 10, 12: PRINT"2: Humano vs 
„ humano " : BEEP 

1680 LOCATE 10, 14: PRINT"3: Máqui na v 
s. humano": BEEP 
i 690 
BEEP 
1 700 
1710 
1720 
1730 
1740 
(0/1 ) 
1 750 
1760 



LOCATE 20,20: INPUT" OPCION" ; JR: 

IF JR=2 THEN J J = 1 : RETURN 
IF JROl AND JR<>3 THEN 1690 
IF JR«1 THEN JJ=3 ELSE JJ = 1 
FOR |SÉ«1 TO 24: PRINT: BEEP: NEXT 
BEEP: LOCATE 10, 10: INPUT "NIVEL 
" ; NI : BEEP 

IF NIO0 AND NI OI THEN 1740 
LOCATE 0,24: FOR N=l TO 13: BEEP 
: PRINT: NEXT 

1770 LOCATE 4, 10: PR I NT " PREPARATE RA 
RA EL INFIERNO, HUMANO" : BEEP 
1780 FOR N=l TO 2000: NEXT 
1790 RETURN 



Test de listado 



i4 en raya» 



10 

20 
30 
40 
50 
60 
70 
80 
90 
100 
1 10 
120 
130 
140 
150 
160 
170 
180 
1 90 
200 
210 
220 
230 
240 
250 




- 

■ 

■ 

■ 

• 

- 


• 

- 

- 97 
-235 

14 

• . 

- 74 
- 1 50 

186 
141 

• 
-240 

174 
•217 
178 

- 92 

- 49 

- 



270 
280 
290 
300 
310 
320 
330 
340 
350 
360 
370 
380 
390 
400 
410 
420 
430 
440 
450 
460 
470 
480 
490 
500 
510 



-138 
-192 
-103 
-246 

- 
-131 
- 1 2 1 
-129 

- 

- 

- 

- 

- 57 
-129 
-167 

- 21 
• 1 20 
-131 
-129 
-167 
-226 
-120 
-131 

129 
-167 

' 22 



530 
540 
550 
560 
570 
580 
590 
600 
610 
620 
630 
640 
650 
660 
670 
680 
690 
700 
710 
720 
730 
740 
750 
760 
770 

780 



- 120 
-131 
--129 
-234 
-168 
-120 
-131 
-142 

- 

- 

- 

~ 

r 31 

-134 

-136 
_ jg 

- 85 
-187 
-129 

- 34 

- 48 
-7 125 
-157 
-209 
-114 

- 3 ' 



790 
800 
810 
820 
830 
840 
850 
860 
870 
880 
890 
900 
910 
920 
930 
940 
950 
960 
970 
980 
990 
1000 
1010 
1020 
1 030 



- 34 
126 

- 81 
125 
159 

■203 
157 
140 

■106 
89 

- 34 
■ 90 
-194 
-248 
•193 
-151 

- 53 
213 
-157 

- 54 
-246 

147 

- 53 
•200 

191 



1050 
1060 
1070 
1 080 
1090 
1 100 
111 
1 120 

1 130 
1 140 
1 150 
1160 
1170 
1180 
1190 
1 200 
1210 
1220 
1230 
1240 
1250 
1260 
1270 
1280 
1 290 



-187 
■109 

- 96 
1 06 

- 96 
106 

■ 93 
-103 

-131 
-126 
-144 
-199 

164 

- 92 
-142 



- 

■ 

■ 
-204 

132 
■192 

129 
• 71 

1 74 



1 3 1 


- 48 


1570 


1 320 


- 62 


1580 


1 330 


-144 


1 590 


1340 


-142 


1 600 


1350 


- 


1610 


1360 


- 


1620 


1 370 


- 


1630 


1380 


- 


1640 


1390 


- 82 


1650 


1400 


- 61 


1660 


1410 


-134 


1670 


1420 


- 64 


1680 


1 430 


-178 


1 690 


1440 


-143 


1700 


1 450 


- 75 


1710 


1 460 


- 64 


1 720 


1470 


-219 


1730 


1480 


-179 


1 740 


1 490 


-130 


1750 


1500 


- 12 


1 760 


1 5 1 


-131 


1770 


1520 


- 47 


1780 


1 530 


- 90 


1790 


1540 


- 72 




1 550 




T 


1560 


-142 





- 

- 

- 

- 

- 53 
■205 

138 

■ 50 

- 83 

• 57 
180 

- 63 
-230 

- 96 

- 35 

- 9 

- 83 

■ 94 

• 72 
190 

-226 

■ 90 
142 

OTAL: 
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El MSX por dentro 



>4 





— 



EN TORNO A LOS 
SPRITES (II) 



La primera parte de este artículo pre- 
tendió sentar las bases sobre la mane- 
ra que los SPRITES encajan en los 
ordenadores MSX, ampliando la 
información que se ofrece en los ma- 
nuales de los fabricantes. En ésta, la 
continuación, se expondrán aplica- 
ciones más complejas, centradas en 
dos aspectos: los registros del VDP 
relacionados con las figuras móviles y 
la gestión de éstos mediante interrup- 
ciones. 



EL VDP Y LOS SPRITES 

La zona de trabajo de los SPRITES 
dentro de la RAM de video viene de- 
terminada por dos registros del VDP: 
el quinto y el sexto. 
El VDP(5) se encarga de indicarle al 
procesador de video dónde empieza la 
zona de atributos (color, posición y 
número de patrón). Quizás os estéis 
preguntando cómo es que un registro 
de sólo ocho bits puede almacenar nú- 
meros mayores de 2*8-1 (255). Para en- 
tender el método con el que el sistema 
consigue salvar este inconveniente, es 
necesario saber que la VRAM cuenta 
con 16K (16384 bytes para ser exactos), 
lo que significa que la dirección más 
alta posible es la 2 14-1 y que el bit más 
significativo es el catorce. Teniendo es- 
to en cuenta y sabiendo que el procesa- 
dor de video considera el contenido del 
VDP(5) como los siete bits de mayor 
peso de la dirección, se deduce fácil- 
mente que se puede hacer referencia a 
cualquier posición de la VRAM, con el 
solo requisito de que ésta sea múltiplo 
de 128, puesto que los siete bits de me- 
nor peso son tomados como ceros por 
el procesador. Así las cosas, siempre 
que se quiera cambiar la zona de atri- 
butos de los SPRITES deberá escribirse 
en el VDP(5) la nueva dirección dividi- 
da por 128. 

Por su parte, el VDP(6) define el inicio 
de la tabla de patrones, es decir, la for- 
ma de los SPRITES. Su contenido indi- 
ca los tres bits más significativos de la 
posición final, por lo que es necesario 
dividir por 2048 la nueva dirección a la 
que debe apuntar. 

DOS JUEGOS DE SPRITES 

De lo expuesto anteriormente se dedu- 
ce que es posible, en determinadas cir- 
cunstancias, mantener a la vez dos jue- 
gos de SPRITES, completamente inde- 
pendientes entre sí, cambiando los re- 
gistros cinco y seis del VDP. Sin 
embargo, en el supuesto de que se pro- 
grame en BASIC, es necesario readap- 



tar, a su vez, las tablas BASE y ciertas 
variables del sistema, de forma que el 
intérprete reconozca plenamente la 
nueva disposición de la VRAM. 
Antes de entrar en más complicaciones, 
os aconsejo que tecleéis el programa 
que sigue: 

10 KEY1 , CHR$ (12) +"PQKE- 

614, &HC9 M +CHR$<13) 

20 KEY2 , CHR$ ( 12 ) +" POKE- 

614, atHc3'»+CHR$<13> 

30 KEY3,CHR$(12)+"SCREE 

N0 M +CHR$<13> 

40 P0KE&HFD9A, &HC9 

50 POKE&HFD9D, 0: POKE&HF 

D9E, 

60 SCREEN1, 

70 FORX=10240TO11260STE 

P4 

80 VPOKEX, 209: VPOKEX+2, 

S: S=S+1 : NEXT 

90 GOSUB2 4 : GOSUB 1 6 : GO 

SUB290: V=4: GOSUB160 

100 Z$=INKEY$: IFZ$=""TH 

EN100 

110 IFVTHENV=0: GOSUB240 
: GOTO100 

120 V=4: GOSUB290: GOTO10 


130 • 

140 ' DEFINICION DE LOS 

SPRITES 
150 » 

160 FORX=0TO3 
170 FORY=0TO7: A$=A$+CHR 
$<VPEEK(Y+X*8+520+V*8) ) 
: NEXT 

180 SPRITES (X)=A$: AS= M " 
: NEXT 

190 FORX=0TO3: PUTSPRITE 
X, <X*20+V*20, 86) , 15: NEX 
T 

200 RETURN 
210 ' 

220 * VDP NORMAL 
230 » 



240 VDP(6)=7: VDP(5)=54 
250 POKE&HF927 , 56 : POKE& 
HF929 , 27 : POKE&HF3C4 , 27 : 
POKE&HF3C6 , 56 : RETURN 
260 ' 

270 * VDP CAMBIADO 
280 ' 

290 VDP<5)=80: VDP(6)=6 
300 POKE&HF927 , 48 : POKE& 
HF929 , 40 : POKE&HF3C4 , 40 : 
POKE&HF3C6 , 48 : RETURN 

FUNCIONAMIENTO DEL 
PROGRAMA 

Observaréis que este programa trabaja 
en SCREEN1. Ello es así porque este 
modo de pantalla deja libres gran parte 
de los 16K de video, lo que permite 
emplear espacios vacíos de la VRAM 
para definir unas nuevas zonas de tra- 
bajo. 

La tabla de atributos de los SPRITES 
en SCREEN1 comienza en la dirección 
6912 (BASE[8]) y la de patrones en la 
14336 (BASE[9]). La subrutina de las 
líneas 240 y 250 sitúan al ordenador en 
las condiciones antes descritas, esto es: 
igual que si se acabara de encender el 
aparato y se hubiera tecleado "SCRE- 
EN1". Por otra parte, la subrutina de 
las líneas 290 y 300 hacen que se defi- 
nan nuevas zonas de atributos y de pa- 
trones, apuntando a las direcciones 
10240 y 12288 respectivamente. Natu- 
ralmente estas direcciones pueden ser 
ajustadas a las necesidades de cada pro- 
grama, con la salvedad de que no coin- 
cidan con otras áreas importantes de la 
VRAM. No obstante, para que el intér- 
prete BASIC foínicione bien con la rea- 
signación, es imprescindible preparar la 
nueva zona de atributos, numerando 
los SPRITES de uno en uno y ponién- 
dolos todos en la coordenada vertical 
209, de la misma manera que lo hace el 
sistema operativo cuando se cambia a 
SCREEN1 (las líneas 70 y 80 realizan 
este cometido). 

Otra rutina importante es la que va de 
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las líneas 160 a la 200. Notaréis que se 
asignan a cuatro SPRITES otros tantos 
modelos, para situarlos a continuación 
en una misma fila. Los modelos referi- 
dos no son otros que letras mayúsculas 
tomadas de los patrones de caracteres. 
Llegado a este punto, estamos en con- 
diciones de analizar el comportamiento 
del programa. Al hacer RUN, la línea 
90 llamará a las subrutinas correspon- 
dientes para definir los cuatro primeros 
SPRITES como letras de la A a la D. 
Además, la misma línea cambiará los 
registros del VDP para adaptarlos al 
nuevo juego de SPRITES y conferirá a 
las cuatro primeras figuras el siguiente 
grupo de letras (de la E a la H). Todos 
estos modelos podrán ser vistos con 
ayuda de las líneas 100 a 120, puesto 
que cada vez que se pulse una tecla se 
intercambiarán el juego de SPRITES. 
He de advertiros que no debéis tocar la 
tecla de función F2, porque su funcio- 
namiento podría colgar el ordenador. 



CONMUTACION POR 
INTERRUPCIONES 

Habéis visto de que forma tan sencilla 
es posible construir dos juegos de 
SPRITES por separado y acceder a 
cualquiera de elfos a voluntad. Sin 
embargo, lo ideal sería poder contar 
con ambos a la vez. Ya que esto no es 
posible, intentaremos hacer el cambio 
de juego de manera tan rápida que dé la 
impresión de que los dos están funcio- 
nando simultáneamente. Os aconsejo 
que probéis a mantener apretada una 
tecla mientras ejecutáis el programa 
anterior, para haceros una idea del 
principio de conmutación por inte- 
rrupciones. 

El sistema operativo de los MSX traba- 
ja atendiendo una interrupción cada 
1/50 segundos, utilizando para ello una 
rutina del BIOS situada en la posición 
&H38. Lo primero que hace esta rutina 
es apilar todos los registros y llamar al 
gancho situado en &HFD9A. Para 
nuestros fines, será necesario poner en 
parche en la referida posición y hacer 
que se alternen los dos juegos de SPRI- 
TES a cada interrupción. 
La rutina que sigue emplea este princi- 
pio: 



10 


0RG 


50000 


20 URTVDP: 


EQU 


147 


30 scrhod: 


EQU 


IFCAF 


40 8ASE8: 


EQU 


6912 


50 BASE9: 


EQU 


14336 


60 N6ASE8: 


EQU 


10240 


70 NBASE9: 


EQU 


12288 


80 


LD 


A, (SCRHOD) 


90 


DEC 


A 


100 


RET 


NZ 



110 


LD A.IC9 


120 


LD (IFD9A),A 


130 


LD A, (RELE+i ) 


140 


0R A 


150 


JR Z,E0 


160 


LD A,(IF3E0) 


170 


X0R 1 


180 


i h n a 

LD B,A 


190 


LD C,l 


200 


CALL WRTVDP 


210 eo: 


LD A, (RELE) 


220 


XQR 255 


230 


LD (RELE), A 


240 


JR 2, El 


250 


CALL VDPCAHB 


260 


JR EXIT 


270 El: 


CALL VDPNOML 


280 EX IT: 


LD A.IC3 


290 


i a / irn a a \ a 

LD (IFD9A),A 


300 


RET 


310 vdpnoml: 


LD B.BASE8/128 


320 


LD C,5 


330 


CALL WRTVDP 


340 


LD B , BASES/2048 


350 


LD C,6 


360 


CALL WRTVDP 


370 


LD HL.BASE8 


380 


LD (IF928),HL 


390 


LD HL.BASE9 


400 


LD (»F926),HL 


410 


HPT 

RET 


áT A 1 1 A A A ftuf, . 

420 VDPCAHB: 


1 A r> i l A A «TA 1 i A A 

LD B.NBASE8/128 


430 


LD C,5 


440 


aai i i lATiinn 

CALL WRTVDP 


450 


lA A tlRlAPA IAA 1A 

LD B.NBASE9/2048 


460 


LD C,6 


470 


CALL WRTVDP 


480 


1 A 111 kir.AT.PA 

LD HL, NBASE8 


490 


LD (IF928),HL 


500 


LD HL , NBASE9 


510 


■ n /irAAr \ ni 

LD (IF926),HL 


520 


RET 


530 


0R6 IFD9A 


540 


JP 50000 


550 RELE: 


DEFB 







Como observaréis, esta rutina de con- 
mutación se sirve de dos subrutinas que 
funcionan de la misma forma que sus 
homologas en BASIC, me refiero a las 
que se encargan de cambiar los registros 
del VDP y las variables del sistema para 
pasar de uno a otro juego de SPRITES. 
Así, la subrutina VDPNOML hace lo 
mismo que la de la línea 240 del progra- 
ma BASIC y VDOCAMB se comporta 
igual que la de la línea 290. 
Si no tenéis ensamblador emplead este 
programa cargador: 



10 
20 
30 



CONMUTACION DE 
SPRITES POR 



40 ' INTERRUPCIONES 
50 » 

60 FORX=50000!TO50104! 
70 READVS : POKEX, VALC'&H 
"+V$) 

80 S=S+VAL("&H M +V$) : NEX 
T 

90 IFSO 10130THENBEEP: C 
LS: PRINT"HAY UN ERROR E 
N LAS DATAS 

100 P0KE&HFD9B , &H5 O : POK 
E&HFD9C, &HC3 
110 P0KE&HFD9D, 0: POKE&H 
FD9E, O 

120 DATA3A, AF, FC, 3D, CO, 
3E, C9, 32, 9A ( FD, 3A, 9E, FD 
, B7, 28, OB, 3A, EO, F3, EE, 
1, 47, OE, 01, CD, 47» 00, 3A, 
9D, FD, EE, FF, 32, 9D, FD, 28 
, 05, CD, 9E, C3, 18, 03, CD, 8 
3, C3, 3E, C3, 32, 9A, FD, C9, 
06,36, OE, 05,CD,47, 00, 06 
, 07, OE, 06, CD, 47, 00, 21, O 
0, IB, 22, 28, F9, 21, 00, 38, 
22,26,F9,C9, 06,50, OE, 05 
,CD 

130 DATA47, 00, 06, 06, OE, 
06, CD, 47, 00, 21, 00, 28, 22 
, 28, F9, 21, 00, 30, 22, 26, F 
9,C9 



EJECUCION DE LA RUTINA 

Esta rutina no funciona de forma inde- 
pendiente, necesita el programa BASIC 
para correr. Cuando tengáis los códi- 
gos en memoria, cargad el referido pro- 
grama y volved a ejecutarlo, añadiendo 
la siguiente línea: 
105 END 

El programa se detendrá mostrando 
cuatro SPRITES en la pantalla (letras 
de la E a la H). Ahora, pulsad la tecla 
F2. Si todo sale como está previsto, de- 
beréis contemplar los dos juegos de 
SPRITES a la vez, cosa que podréis 
constatar por el hecho de que aparecen 
ocho figuras en la misma línea, cuando 
la regla de quinta SPRITE prohibe te- 
ner más de cuatro. 

También es posible que coexistan dos 
juegos de SPRITES de diferentes tama- 
ños. Para ello, pulsad la tecla Fl y eli- 
minaréis el funcionamiento de la rutina 
de interrupciones. A continuación, te- 
clead POKE&HFD9E,l y reactivad la 
rutina con F2. De esta forma haréis que 
uno de los juegos se represente am- 
pliado. 

POSIBLES USOS DE LA RUTINA 

La rutina de conmutación presenta un 
inconveniente: en monitores con poca 
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MSX por dentro 





persistencia en el tubo de rayos catódi- 
cos puede presentarse una molesta vi- 
bración. Sin embargo, hay programas 
comerciales que emplean una rutina si- 
milar a ésta, aunque limitan su uso a 
apariciones esporádicas de SPRITES. 
Una aplicación típica son los casos en 
los que es necesario contar con muchas 
figuras en pantalla a la vez, como cuan- 



do se quieren representar explosiones u 
otros efectos que sólo han de ser. vistos 
por unos momentos; logrando así que 
el inconveniente de la vibración no sea 
perceptible. 

CONCLUSIONES 

Es posible que lo tocado aquí resulte 



difícil de entender para los recién llega- 
dos al MSX. De cualquier forma y aun- 
que alguno de los temas no haya que- 
dado claro para alguno de vosotros, es 
seguro que habréis avanzado un poco 
más en las interioridades del sistema. 
Sin abandonar los SPRITES, la tercera 
parte de este artículo, versará sobre las 
colisiones. 




POSTER UTIL DE REGALO! 



N." 1 a 4 - 475 PTAS. N.° 5 - 150 PTAS. 




N. u 7- I50PTAS. N." 8-150 PTAS. N.~ 9 y 10- 300 PTAS. 



PR0GRMU& . í " Y 

£• ¡1 M 4: 



y-), 1 




N.° 14 - 175 PTAS. 'N • 15 - 175 PTAS. N. ÜS 16 y 17 - 350 PTAS. 




N." 18 - 175 PTAS. 



¡SI TE HACE FALTA ALGUN NUMERO DE CSl PIDELO HOY MISMO! 

Para contar con la más completa colección de programas de MSX sólo tienes que recortar o fotocopiar el cu- 
pón y dirigirlo a Dpto. Suscripciones MSX CLUB DE PROGRAMAS. Roca i Batlle, 10-12. 08023 Barcelona. 



BOLETIN DE PEDIDO 



| Sí, deseo recibir hoy mismo los números de MSX CLUB DE PROGRAMAS, libre de 

gastos de envío, por lo que adjunto talón n." del Banco/Caja 

por el importe de ptas. a nombre de MANHATTAN TKAN!^R/S.a! 

I NOMBRE Y APELLIDOS 

| CALLE N." CIUDAD 

[j^ PROVINCIA TEL 
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THE GRUNEBERG L1NKW0RD 
LANGUAGE SYSTEM 

u/d@t 



CURSO DE INGLES 



The Gruneberg Linkword Language System es un sistema, para enseñanza de idiomas, más rápido y 
fácil que los métodos convencionales aplicados actualmente. 

En poco tiempo, máximo 20 horas, te enseñará un vocabulario de 400 palabras y adquirirás unas buenas 
nociones de gramática. Esto te permitirá entender y ser entendido en tus viajes a lugares de habla inglesa 
o en tus contactos con personas que se expresen en ese idioma. 

Por otra parte, el Sistema PlusData, consigue que el ordenador se convierta en un perfecto profesor que 
te explicará, orientará y corregirá, manteniendo en todo momento un "diálogo" interactivo de resulta- 
dos sorprendentes. 



-"PERSONAL COMPUTER 
WORLD": 

"Un suceso fuera de serie..." 



interesante... " e¿ 771 as 




"Wplu/ 




ICO 

EGB. 




Programas de EAO para EGB. 
Cursos de Basic, Cobol, etc. AUTODIDACTAS. 



Nombre 

Apellidos , 

Dirección , 

Población 

D.P 

Forma de pago: 



I 



Reembolso [ 



•Tino 

Giro postal Q 



Envío talón [_ 



□ Curso de Inglés 1. a parte. 10 lecciones Linkword. (Cinta) P.V.P. 6.900.-Ptas. 

□ Curso de Inglés 1/ parte. 10 lecciones Linkword. (3,5"-Disk) P.V.P. 7.900.-Ptas. 

ENVIAR ESTE CUPON A: PLUS DATA, S.A. C/. GRAN VIA, 661 pral. 08010-Barcelona. Tel. 246 02 02 



ENTRA 
EN LA 
AVENTURA 
CORRE 
A TODA 
PASTILLA 



Monitor al día 




Otro juego sensacional de 
MANHATTAN TRANSFER, S. A. 



SONY INAUGURA 
EXPOSICION PERMANENTE 
DE TODOS SUS PRODUCTOS 

SONY, una de las compañía pio- 
neras en el ámbito del MSX, da 
un nuevo paso al frente para acercar a 
los usuarios toda su gama de produc- 
tos; no sólo los ordenadores sino tam- 
bién sus últimas novedades en TV, Ví- 
deo, Compact Disk y Alta Fidelidad. 
Para todo ello, ha inaugurado reciente- 
mente un amplio local de 340 m 2 en 
Barcelona, en la calle Sabino de Arana 
52-54. En ella ocupa un lugar preferen- 
cia! la gama de ordenadores y periféri- 
cos, que disponen de una sala indivi- 
dual de 30 m 2 donde se han instalados 
30 equipos MSX a la entera disposición 
del público. Además de ello, también 
hay un aula informática donde se 
imparten cursillos de BASIC en cinta 
de vídeo. 

Otro apartado al que se ha dedicado 
especial atención ha sido el video, don- 
de los visitantes pueden ver y probar el 
revolucionario sistema de vídeo de 8 
m/m manejando una Handicam. 
Es realmente ejemplar que una firma 
del prestigio de SONY se decida a 
acercar sus productos a los usuarios sin 
ningún ánimo de lucro, ya que no se 
realizan ventas en el mencionado local, 
y ofreciendo el asesoramiento de su 
personal especializado ante cualquier 
duda que pueda planteársele. 
En resumen, esta exposición perma- 
nente es una muestra más de garantía 
puesto que no hay mejor forma de ava- 
lar un producto que permitir que el hi- 
potético cliente lo pruebe a su gusto 
antes de decidirse. 



THE GRUNEBERG LINKWORD 
LANGUAGE SYSTEM 

PlusDATA S.A. empresa creada 
recientemente por profesionales 
de la informática, tiene como objetivo 
principal el desarrollo del SOFTWA- 
RE EDUCATIVO. Además han co- 
menzado con buen pie, puesto que pre- 
sentan al mercado nacional un «Num- 
ber One» de este tipo de software: El 
curso de Inglés por ordenador GRU- 
NEBERG LINKWORD LANGUA- 
JE SYSTEM; desarrollado por una pri- 
merísima autoridad en Psicología, el 



profesor Michael Gruneberg en cola- 
boración con otros miembros de la 
Universidad de Swansea (Gales) donde 
tiene su cátedra. Este sistema, amplia- 
mente conocido allende nuestras fron- 
teras donde ha probado su eficacia a 
miles de usuarios que con él han apren- 
dido algún idioma extranjero. 
El objetivo principal del sistema es 
conseguir una rápida y fácil memoriza- 
ción de un extenso vocabulario de casi 
400 palabras, lo que se consigue me- 
diante la interrelación de palabras e 
imágenes junto- con lo distendido y 
chocante de las' frases que se utilizan 
durante el curso y los ejercicios de tra- 
ducción. 

Además de todo esto, PlusDATA S.A. 
entregará un diploma acreditativo de 
haber culminado el curso con éxito a 
quienes completen con éxito el examen 
final. Do you speak English? 



JOYSTICK SPEED KING 







Ú compute? 















SERMA S.A., empresa puntera en 
el terreno del MSX comercializa 
un joystick absolutamente revolucio- 
nario. Se trata del SPEEDKING, que 
es quizá el heraldo de un nuevo con- 
cepto en el terreno de los joysticks. De 
diseño absolutamente ergonómico y de 
rápida respuesta está pensado para 
obtener una máxima velocidad en cual- 
quier aplicación. 

Al margen de su novedoso diseño, que 
permite sostener perfectamente el man- 
do con la mano izquierda que se ocupa 
del botón disparador mientras la dere- 
cha opera la palanca, merece especial 
atención su solidez y consistencia. Mu- 
chos usuarios han experimentado en 
carne propia que los joysticks terminan 
muriendo por la palanca, cosa que es 
difícil que suceda en este mando por ser 
el interior de la misma un eje de acero. 
Premio al que lo rompa. 




PRIMERAS 

JORNADAS 
DEL MSX 



+4 n el marco de SONIMAG, que se celebra en Barcelona 
J— / del 15 al 21 de Septiembre y tendrán lugar las primeras 
jornadas del standard MSX, organizadas por MANHAT- 
TAN TRANSFER, S.A. con la inapreciable colaboración de 
los principales representantes del standard. 
En estas jornadas, tomarán parte además de los fabricantes 
de los ordenadores los fabricantes de software y las principa- 
les firmas relacionadas de un modo u otro con el sistema 
MSX, además de la prensa especializada. 
Hasta estas primeras Jornadas del MSX no se había conse- 
guido una comunicación tan directa y variada entre los dife- 
rentes sectores que componen el espectro de la norma. 
Uno de los objetivos primordiales de estas Jornadas es la 
unificación de posturas entre los fabricantes — tanto de soft- 
ware como de hardware — de cara a adoptar estrategias co- 
munes para la implantación definitiva del standard, que ha- 
brá que redundar en una mejor calidad de los productos 
finales y en una más amplia cobertura del espectro de las 
necesidades de los usuarios. 

Otro tema que se piensa tratar a fondo es el de la piratería, 

que tanto perjudica a usuarios y fabricantes. 

Se crearán diversas comisiones integradas por miembros de 

los diversas entidades participantes, con lo que se espera for- 

mentar la colaboración de cara a una política de objetivos 

comunes. 

Esperamos que se obtenga mucho provecho de estas prime- 
ras Jornadas del MSX, y sobre todo, que de ellas salga bene- 
ficiado en primer lugar el usuario, que en definitiva es quien 
cuenta. 



GR^cwcímso 

BOOGA 
BOO 



¡Haz saltar la pulga hasta 
lo más alto y podras ganar 
hasta 125.000 pts. en pre- 
mios! 

MSX CLUB DE PRO- 
GRAMAS y MIND GA- 
MES ESPAÑA, S.A. te des- 
afían a que juegues con Boo- 
ga Boo y ganes. Booga Boo 
es una simpática pulga salta- 
rina que cierto día cae a las 
profundidades de una cueva 
habitada por un peligroso 
dragón y plantas carnívoras. 
Tú, no solo tienes que sor- 
tear estos obstáculos, sino 
llevar a Booga Boo a la su- 
perficie superando los 80 ni- 
veles de que consta el juego 
y logrando la máxima pun- 
tuación. ¿Te animas? 

Bases 

1. Para participar remítenos: 

a) Una fotografía de la últi- 
ma pantalla de Booga Boo. 

b) Una fotografía del ta- 
blero de puntuación con tu 
nombre en el primer lugar. 

c) Al dorso de ambas fotos 
coloca tu nombre, direc- 
ción, teléfono y el número 
de referencia de Mind Ga- 
mes España, S.A., editor 
autorizado de Booga Boo 
en versión MSX para Es- 
paña, que figura en la cará- 
tula original. 

2. El ganador será el que 
obtenga mayor puntuación. 

3. En caso de haber más de un 
concursante con la máxima 
puntuación, el ganador se 
sorteará entre ellos. 

4. El premio al ganador con- 
sistirá en 125.000 pts. en 
software de Mind Games 
España S.A. y material di- 
dáctico de informática MSX. 




5. Todos los concursantes re- 
cibirán un regalo por su 
participación. 

6. El concurso caduca el día 
30 de noviembre de 1986. 

7. Quedan excluidos de parti- 
cipar en este concurso los 
empleados, agentes y fami- 
liares de los mismos de Quick- 
silva Ltd., Argus Specialist 
Pubücations, Alabaster Pass- 
more & Sons, Mind Games 
España, S.A., Ivex Films, 
S.A. y Manhattan Transfer, 
S.A. 

8. La participación implica la 
aceptación de las presentes 
regías. 

9. Las decisiones de MSX 
CLUB DE PROGRAMAS 
serán inapelables y no se 
mantendrá corresponden- 
cia con los concursantes. 

10. Remite el sobre a: 

MSX CLUB DE 
PROGRAMAS 
CONCURSO 
BOOGA BOO 
Roca i Batlle 10-12 
Barcelona 08023 



¡¡GANA 125.000 pts.!! 
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El MSX en expansióni 



iPor Josep Oriol Tomasi 



IMAGEN POR 
ORDENADOR 



El uso de la imagen creada mediante 
ordenador se está generalizando hoy en 
día en todos los campos de la comuni- 
cación visual. Podemos ver imagen 
creada y animada mediante ordenador 
en la televisón en forma de videoclips, 
las alienantes series de dibujos anima- 
dos japoneses que son — o al menos lo 
parecen — todas iguales, publicidad te- 
levisiva, carátulas de presentación de 

f>rogramas, e incluso en el cine donde 
as escenas más imposibles de ciencia- 
ficción o fantasía, toman una materiali- 
dad tan ficticia como convincente. 
En su versión estática, la encontramos 
también en los mapas del tiempo de los 
informativos, en los títulos de crédito 
de numerosos programas, gráficos es- 
tadísticos y, ya fuera del ámbito televi- 
sivo, en folletos, revistas y catálogos 
bajo la forma de logotipos, gráficos es- 
tadísticos, y toda suerte de grafismos 
espectaculares que con toda probabili- 
dad, nos habrán despertado la curiosi- 
dad en el sentido de cómo habrían sido 
realizados. 

Ejemplos conocidos de la imagen reali- 
zada con ordenador (casi al límite de las 
posibilidades que permite la técnica 
actual) los tenemos en el videoclip 
"Hard Woman" de los Rolling Stones, 
la película "The Last Starfighter" ó, 
anteriormente, la película "Tron". 
Además de un nuevo medio de comu- 
nicación visual, la imagen por ordena- 
dor es también un nuevo arte, pero con 
una enorme ventaja sobre las restantes 
manifestaciones de arte pictórico-vi- 
sual; la transportabilidad. El soporte de 
presentación de la imagen de ordena- 
dor es, principalmente, la pantalla del 
monitor, pero se conviene por necesi- 
dad que, la representación de esa ima- 
gen en un soporte final en forma de 
cinta de video, fotografía, etc., tiene el 
mismo valor y además, normalmente, 
también se ve mejor que el original en 
la propia pantalla del ordenador. Adi- 
cionalmente, por si fueran pocas las 
cualidades sorprendentes de este me- 
dio, al constituir un conjunto más de 



Muchos de nuestros lectores han 
mostrado curiosidad por el apa- 
sionante tema de la imagen por 
ordenador. Para satisfacer su 
curiosidad, vaya como adelanto 
este artículo del Director de VEN- 
TAMATIC S.A., empresa dedi- 
cada a la comercialización de equi- 
pos para esta tarea. 




datos, puede también almacenarse en 
los soportes propios de registro de da- 
tos informáticos (disco, diskette, cinta, 
etc.). 

La particularidad de la imagen de orde- 
nador es que no existe físicamente a 
menos que se traslade a un soporte fo- 
tográfico o impreso. Resulta evidente 
que una imagen representada sobre una 
pantalla de visualización es algo visible 
pero intangible; no existe físicamente 
ya que no la podemos tocar. En reali- 
dad no es más que un montón de unos 
y ceros colocados adecuadamente en 
una memoria. En video tampoco exis- 
ten físicamente, pues se halla codificada 
en una cinta. Se puede decir que sólo 
una vez transferida a una cinta cinema- 
tográfica, fotografía, diapositiva o pa- 
pel, una imagen de ordenador existe fí- 
sicamente. Pero entonces deja ya de ser 



una imagen de ordenador y se convier- 
te en un "dibujo", en una "foto", en un 
"impreso" o en un "fotograma", dado 
que pierde la esencia de imagen electró- 
nica y lo que constituye su particulari- 
dad más fundamental y, posiblemente, 
la razón más poderosa de su propia 
existencia y de la de los equipos que la 
hacen posible; la MODIFICABILI- 
DAD. 



QUE ES LA IMAGEN DE 
ORDENADOR 

Al acercarnos al monitor, hemos podi- 
do observar que todos los dibujos; to- 
das las letras y gráficos, están constitui- 
dos a base de puntitos que en el argot se 
conocen como "pixels"; la materia pri- 
ma de la imagen de ordenador. Cuanto 
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mayor es el número de éstos en panta- 
lla, la velocidad con que pueden ser 
manejados (cambiarlos de color, apa- 
garlos, encenderlos, etc.) y el número 
de colores diferentes que puedan adop- 
tar cada uno, mayor será la potencia del 
ordenador para generar imágenes de 
calidad. 

Así pues, existen grados de calidad que 
van desde la que puede ofrecer el MSX, 
con un resolución de 256x192 puntos 
y 16 colores, hasta sistemas de 
4.096X4.096 pixels y posibilidad de es- 
coger entre 16 millones de colores. 



casa un ordenador para hacer dibujitos 
como quien tiene una caja de rotulado- 
res. Lo que ocurre es que, aparte de lo 
que pueda costar el equipo físico de 
imagen de ordenador (el hardware), lo 
que realmente encarece la realización y 
obtención de imagen de ordenador, y 
hace que se consigan mejores o peores 
resultados, es la serie de programas (el 
software) que hace funcionar al hard- 
ware. 

El diseño de esos programas llega a ser 
extremadamente complejo y suelen re- 
querir de sus creadores grandes conoci- 



- Transparencias. 

- Metamorfosis de formas a través de 
una secuencia de animación. 

- Ampliación y reducción de figuras. 

- Visualización desde puntos de vista 
variables, tanto internos como exter- 
nos a la figura. 

- Etc., etc. 

Se comprende pues que estos progra- 
mas lleguen a requerir años de trabajo 
por parte de competentes equipos de 
programación, y que puedan costar 
muchos millones de pesetas. 




Obviamente, sus precios también dis- 
tan mücho; desde las 50.000 ptas.- de 
un MSX, pasando por sistemas basados 
en ordenadores tipo PC y compatibles 
que pueden costar entre 1 y 15 millo- 
nes, y los casi 100 millones del especia- 
lizado BOSCH FGS40. 
En definitiva, el fundamento de la ima- 
gen de ordenador es tan viejo como la 
historia misma de los ordenadores. Se 
trata, simplemente, de la representa- 
ción en la pantalla de una serie de datos 
codificados en la memoria del mismo. 
Lo que al principio sólo fue una rudi- 
mentaria capacidad para representar 
unos bastos caracteres alfanuméricos, 
se ha ido desarrollando y perfeccionan- 
do hasta alcanzar las características 
descritas anteriormente. 
Ahora bien, si el asunto fuera tan senci- 
llo, a estas alturas todos tendríamos en 



mi en tos de matemáticas y física por 
parte de los que intervienen. Si bien 
hay programas sencillos de dibujo en 
dos dimensiones que se limitan a per- 
mitir el trazado de líneas, figuras geo- 
métricas, rellenos de color, etc., los 
programas más complejos de dibujo en 
tres dimensiones y animación permiten 
efectos tales como: 

- Simulación de varios focos de luz de 
color, intensidad, incidencia, posi- 
ción, etc. totalmente variables. 

- Degradados de color o efectos de ae- 
rógrafo. 

- Desplazamiento y visualización de fi- 
guras en los tres ejes. 

- Definición de recorridos y movi- 
mientos de animación. 

- Sombreado de acuerdo con los focos 
de luz. 



LA IMAGEN DE ORDE- 
NADOR EN EL MUNDO 

Hay muchas más empresas dedicadas al 
diseño y fabricación de sistemas más o 
menos complejos de imagen de ordena- 
dor, hardware y programas, así como 
de producción comercial de imagen de 
ordenador para usuarios finales, princi- 
palmente en Estados Unidos, aunque 
también las hay en Inglaterra, Francia, 
Canadá, Alemania y Japón. 
Las empresas de producción comercial 
de imagen de ordenador suelen trabajar 
para productoras de televisión, de cine, 
discográficas, agencias de publicidad, 
etc. y realizan trabajos tan variados y 
de distinta índole como los dibujos ani- 
mados de Heidi o Los Mosqueperros, 
escenas de las películas de la saga de 
"La Guerra de las Galaxias", los rótu- 
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los de aquel u otro anuncio del deter- 
gente-que-lava-más-blanco-que-el-de- 
mi-vecina, los gráficos estadísticos de la 
multinacional de turno, el logotipo de 
la ferretería de la esquina, el última vi- 
deo-clip de los "Desconocidos", e in- 
cluso los efectos de rayo láser de cual- 
quiera de las series norteamericanas bi- 
rrioso-espaciales. 

En la asctualidad se editan alrededor de 
10 revistas especializadas y se celebran 
otras tantas ferias anuales, entre las que 
cabe destacar la del SIGGRAPH, que 
reúne la mayor exhibición de trabajos y 
empresas del sector de todo el mundo. 



LA IMAGEN DE ORDE- 
NADOR EN ESPAÑA 

Como en tantas otras cosas, en España 
hemos entrado un poco tarde en este 
fantástico mundo de la imagen por 
ordenador, y hay todavía pocas empre- 
sas que se dediquen a su creación y co- 
mercialización y, en la mayoría de los 
casos, con muchos menos medios que 
empresas similares de Francia, Inglate- 
rra, Alemania o Luxemburgo (por no 
querer mencionar a Estados Unidos o 
Japón). 

En estos momentos conocemos 4 o 5 
empresas que se dediquen en España a 



la producción de imagen de ordenador, 
y son: 

- A.T.C. en Madrid, que dispone de un 
sistema diseñado por ellos mismos. 
Uno de sus trabajos más interesantes 
es el video de las Meninas digitaliza- 
das presentado en PROCESOS. 

-ANIMATICA en Barcelona, quizás 
la más conocida, que dispone de un 
sistema BOSCH FGS40, y con el que 
han realizado las carátulas de ESTA- 
DI02 y ARSENAL, por citar las dos 
más espectaculares de las muchas que 
han hecho para televisión. 

- FRACTAL en Barcelona. Dispone 
de un sistema PICTUREMAKER de 
CUBICOMP y cuentan con la extra- 
ordinaria ventaja que supone el pro- 
ceder del mundo artístico y del gra- 
fismo, para poder conseguir resulta- 
dos francamente extraordinarios. 

- IDEOGRAPHICS, en Barcelona. Se 
dedican más bien a la creación de 
imagen de ordenador estática con un 
sistema DICOMED. 

-TELSON en Madrid, dispone tam- 
bién de un sistema PICTUREMA- 



Cabe mencionar también los sistemas 
CHYRON de TV3 y los SPACE- 



WARD de TVE, con los que realizan 
múltiples grafismos electrónicos para 
cabeceras, carátulas de presentación, 
mapas del tiempo, etc. 
Por otro lado, y dado que se ha restrin- 
gido bastante la oferta del producto fi- 
nal hacia las televisiones y productoras 
de video, nos encontramos con que el 
mercado es todavía muy reducido para 
que puedan entrar en él un mayor nú- 
mero de empresas. En el medio se habla 
mucho de que cuando aparezcan las te- 
levisiones privadas se ampliará el mer- 
cado y habrá mucho más trabajo, pero 
lo que hay que hacer, y de hecho hay 
alguna personas que ya están haciendo, 
es promocionar la imagen de ordena- 
dor a un nivel de difusión y utilización 
mucho más amplio, pues en realidad, 
ABSOLUTAMENTE TODOS los di- 
seños, grafismos, logotipos, marcas, 
ilustraciones, etc. que se están realizan- 
do con métodos manuales tradicionales 
y se utilizan en toda la industria del 
país, pueden realizarse con mucha más 
facilidad, rapidez, posibilidades y me- 
jores resultados mediante un ordena- 
dor. 

También hay pocas empresas en Es- 
paña dedicadas a la comercialización de 
equipos de imagen por ordenador y, de 
hecho, sólo conocemos una que esté 
más o menos al corriente de todo lo 
que existe y se está desarrollando en 
este mercado a nivel mundial, y que 
actúe de distribuidora tanto de marcas 
con importador oficial en España, co- 
mo de marcas que no lo tengan. Se trata 
de VENTAMATIC. 
Las empresas que importan, entre otros 
muchos productos que nada tienen que 
ver con el tema que nos ocupa, tarjetas 
gráficas y software para micro-ordena- 
dores tipo PC y compatibles con capa- 
cidad para crear imagen de ordenador 
de características totalmente profesio- 
nales, como por ejemplo OMNILO- 
GIC, que importa NUMBER NINE, 
PC VISION, HALO, GRAFPOINT, 
IMIGIT y CHORUS o FOX COM- 
PUTER, que importa CORECO. 
Las empresas especializadas en equipos 
más dirigidos a productoras de video, 
son: COMAQUISA, que importa los 
famosos sistemas PICTUREMAKER 
de CUBICOMP; DATA VISION, que 
importa X-COM y el C.V.I. (Compu- 
ter Video Instrument) de FAIR- 
LIGHT; y otros importadores de 
CHYRON, QUANTEL, ETC. 



JOSEP ORIOL TOMAS 

Director de Ventamatic 
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BIENVENIDOS A 

UN SOFTWARE DE AL! 




de CASSETTES 



KRYPION 



KRYPTON. La batalla mas audaz de las gala- 
tías en cuatro pantallas y cuatro niveles de 
dificultad. Unjuego cuya popularidad es cada 
vez mas grande entre los usuarios del MSX. 
PVP. 500 Ptas. 



El secreto de la 




TA CALIDAD PAM MSX 



QUINIELAS I 

7 ■ 



Ü-BOOT. Sensacional juego de simulación 
submarina en la que tienes que demostrar tu 
pericia como capitán de un poderoso subma- 
rino de guerra. Panel de mandos, sonar, tor- 
pedos, eto. PVP. 700 Ptas. 



CON GARANTIA / 



QUINTELAB. Bl más completo programa de 
quinielas con estadística de la lija, de los 
aciertos, etc. e impresión de boletos. Acertar 
no siempre es cuestión de suerte. fVP. 700 
Ptas. 




8NAKE. Entretenido y muy divertid 
en el que Snake procura comer unos núme- 
ros que la engordan. Tanto las murallas que 
la rodean como su larga cola pueden ser 



^ F * 





y/ 

CdN GARANTIA 

^^HAFWTRANSR^SA 



LA PIRAMIDE. Atrevido 
) aventuras a través de los misterios 
y peligros que enolerran los laberínticos pa- 
i de una pirámide egipcia ¡Atrévete si 
! PVP. 700 Ptas. 



STAR RUOTER. Conviértete en el audaz 
piloto interestelar y lucha a muerte, a 
través del hiperespaclo, contra las defen- 
sas del tirano Daurus. Dos pantallas y 
cinco niveles de dificultad. PVP. 1.000 pte. 



FLOPPY, El Preguntón. Dn verdadero desafío 
a tus conocimientos de Geografía e Historia 
española Ploppy no perdona y te costará 
mucho superarlo. PVP. 1.000 Ptas. 



MAD FOX. Un héroe solitario es 
una carrera a vida o muerte por un desiert 
plagado de peligros. Conseguir el combusti- 
ble para sobrevivir es su misión. I 
de dificultad. PVP 1.000 pts. 




y envíalo 



Nombre y apellidos: 

I Dirección: 

I Población: 

1 □ KRYPTON 

□ U-BOOT 

□ QUINTELAS 



CP 



Prov. 



Tel.: 




FLOPPY 
MAD FOX 



Ptas. 500- □ SNAKE Ptas. 600- 

Ptas.700- □ EL SECRETO DE LA PIRAMIDE Ptas. 700- 

Ptas.700- □ STARRUNNER Ptas. 1.000,- 

Gastos de envío certificado por cada cassette Ptas. 70,- 

Remito talón bancario de Ptas. a la orden de Manhattan Transfer, S A 



PVP. 1.000 Ptas. 
PVP. 1.000 Ptas. 



ATENCION: Los suscriptores tienen un descuento del 10% sobre el precio de cada cassette. 

IMPORTAME: 

indicar en ei sobre MSX CLUB DE CASSETTES. ROCA I BATLLE, 10-12 BAJOS. 08023 BARCELO 




NUESTRAS CASSETTES NO SE VENDEN EN QUIOSCOS. LA UNICA FORMA DE ADQUIRIRLAS ES SOLICITANDOLAS 

A NUESTRA REDACCION. ¡NO SE ADMITE CONTRA REEMBOLSO! 



Programa 



— 



iPor Sasch 



PHANTOM 



• \ 



PHANTOM no es el típico juego 
de matar marcianos, así como 
tampoco se trata de un juego de 
aventura. Pero participa un poco 
del espíritu de ambos. Hay que 
recoger 4 monedas perdidas en 
una casa a oscuras llena de bichos 
mortales; pero... 




3 * * PHANTOM * 

4 ' * POR SASCHA (ALEJANDRO) * 

5 •- * YLLA-KoNNEKE * 

6 ' * PARA MSX-CLUB DE PROGRAMAS *. 

** -^í^" ^í 1 " ^'t^' ^í 5 - "^í^" "'í^" -^í^" ^ *^ ^í^' 

O ? ü'^^ü^^i' ^ ! O r "' » •A' -J- i- 4- |- i- I •'■ ^ i |- i- 0/ a- 

C-? ^ t T t ^ T' -T T T -T' X 7 1 ) O 1" T 1 *• T- -V T 1 -T- T 1 T* T- * 

? ' 

10 ON STOP GOSLIB 5430 
20 STOP ON 

30 COLOR 15, 1 „ 1 : SCREEN 2: COLOR 15,1 
, 1 : KEYQFF : OPEN " GRP : "AS#1 
40 ' PRESENTACION 

50 SPR I TE* ( 1 ) =CHR* ( &HFF ) +CHR* ( &HFF ) 

+CHR* ( &HC3 ) +CHR* ( &HC3 ) -+CHR* ( &HFF ) +-C 

HR* (&HFF ) +CHR* ( &HC0 ) +CHR* ( &HC0 ) 

60 SPR I TE* (2) =CHR* (&HC3) +CHR* í &HC3) 

+CHR* ( &HC3 ) +CHR* ( &HFF ) +CHR* ( &HFF ) +C 

HR* (&HC3) +CHR* (&HC3) +CHR* ( ) 

70 SPR I TE* ( 3 ) =CHR* ( &HFF ) +CHR* < fcHFF ) 

•+CHP* < &HC3 ) +CHR* ( &HC3) +CHR* < S<HFF ) +C 

HR* í &.HFF ) +CHR* ( &HC3 ) +CHR* ( &HC3 ) 

80 SPR I TE* ( 4 ) =CHR* ( §<HF3 ) +CHR* ( §cHF3 ) 

+CHR* ( ?:HF3 ) +CHR* ( fcHFB ) +CHR* ( &HDB ) +C 

HR* < &-.HCF ) +CHR* ( S'.HCF ) +CHR* ( &HCF ) 

90 SPR I TE* ( 5 ) =CHR* ( &HFF ) +CHR* ( UiFF ) 

•+-CHR* ( ?<H 1 8 ) +CHR* « &H 1 8 ) +CHR* < &H 1 8 > +C 

HR* C-8iN 1 8 > +CHR* ( &H 1 8 > +CHR* ( &H 1.8 ) 

1 00 SPR I TE* ( 6 ) =CHR* < &HFF ) +CHR* ( &HFF 



X + CHR* (&HC3) +CHR* (?<HC3) +CHR* <&HC3) + 
CHR* ( ?<HC3 ) +CHR* ( &HFF ) +CHR* ( &HFF ) 
1 05 SPR I TE* ( 7 ) =CHR* ( gíMC3 i +CHR* ( &HE7 
) +CHR* ( S'.HFF ) +CHR* ( &HDB ) +CHR* ( &HDB ) + 
CHR* <?<HDB> +-CHR* ( &HC3) +CHR* <?íHG3 ) 



1 10 

i 30 
140 
í 50 
160 
170 
180 
1 90 
200 
210 
220 
230 
240 
250 
260 
270 
280 
290 
300 
310 
320 
330 
340 



iOSUB 460: A==0sB=0 

"SPRITE1 , (A, B) , 15, 1 
A^A-'-3s B=B+3 
IF A>50 THEN A=50 
IFB>90 THEN B=90:GOTO 170 
GOTO 120 
C=255í D=0 

PUTSPRITE 2, (C,D) , 15,2 

C=C-3: D-D+3 

I FD >90THEN D=?0 

IF C<70THEN C=70:GOTO 230 

GOTO 180 

E=255:F=192 

PUTSPR I TE3 , (E,F) ¿ 15,3 

IF F<90 THEN F=?0 

IF E< 90 THEN E=90:GOTO 290 

GOTO 240 ■ 

G=0: H=192 

PUT SPRITE4, í G , H ) , 15,4 
G=G+3: H=H-3 

IF H<100 AND G< 1 00THEN H*¿W 
IF G > 1 1 0THEN G=l 10: H=H~1 
IF H< 90 THEN H=90:GOTO 360 



350 GGTÜ 300 

360 1=210: J = 100 

370 PUT SPRITE 5,(I,J),15,5 

380 RUT SPRITE 6 , ( I +20 , J ) , 1 5 , 6 

390 PUT SPRITE 7 , 'I +40 . J ) , 1 5 „ 7 

400 1=1-3 

410 IF K 130 THEN 1=1 30: GOTO 430 
420 GOTO 370 

430 GOSUB 460 : L I NE ( 30 , 70 ) - ( 225 , 1 50 ) 

, 4 ,B: COLOR , , 4: RAI NT (0, 0) , 4 

440 PRESET (35, 140) : COLOR 15:RRINT#1 

, "POR SASCHA YLLA-KbNNEKE " 

450 FOR 1=0 TO 100: NEXT: COLOR ,,1:F 

ORI=0TÜ 200: NEXT: GOTO' 430 

460 PLA Y " T255 V 1 5L 1 03DD#ED#DD#ED#DD 

#ED#DDD#" , " V 1 5L 1 07FAFAFAL64EFFFFFFF 

FF" , "T25502V15L1DD#ED#DD#ED#DD#ED#D 

DD" 

470 RETURN 

480 COLOR , , 12:FORI=0TO200:NEXT:COL 
OR , , 1 : FOR I =0TO200 : NEXT: COLOR , „ 13.: 
FORI=0TO 300: NEXT 

490 COLOR , ., 1 : FOR I --0TO200 : NEXT: COLO 
R , ,8:FQRI=0TO 200: NEXT s COLOR ,,1:F 
ORI=0TO200s NEXT: COLOR , , 1 1 ¡ FORI.=0TO 

200: NEXT: COLOR , , 1 
500 FORI =0 TO 1000: NEXT: SCREEN 
510 ' INSTRUCCIONES 

520 CLS:PRINT"NECESITAS INSTRUCCION 
ES (S/N)? " 
530 I*=INKEY* 

540 IF I*="S"OR I*="s"THEN 570 
550 IF I*="N"OR I*="n"THEN PRINTrPR 
INT:PRINT:CLS;GOTO 6S0 
560 GOTO 530 

570 CLS:PRINT" INSTRUCCIO 
MES" 

S 8 id P R I N T : F' P I NT " Ere s u n b u s c ador d e 
tesoros y has oído hablar de un 

as monedas (=COINS) antiguas (de mu 

che valor) en una casa abandonada." 

590 RRINT"La casa no tiene luz pero 
por s u,e r t e t e h a a t r a i d o c e r i 1 1 a s ( 

"MATCHES ) u 

600 PRiNT"Ten cuidado por donde pis 

as 1 Por el suelo hay muchas arañas 

ü -fantasmas y calaveras I" 

610 PRINT"MG SE TE OCURRA TOCARLOS 

PUES PERDE- RIAS UNA VIDA. La casa t 

i en e 6 h ab i t a—c i on es ( =ROOM ) . " 

620 PRINT"No puedes andar con una c 

er i 1 1 a en •- c en d i d a ! As i q ue f i j a t 

e bien si en — cien des una ! 

630 PRINT"Los cuadros verdes son pu 

ertas para pasar a otras habitacio 

nes. Después de recoger las 4 moneda 

s (=* ) vuel ve al punto de sal ida '," 

640 PRINT;PRINT"< SRACE >" 

650 I*=INKEY* 

660 IF I*=" "THEN 680 



670 GOTO 650 

680 CLS: LOCATE 2,5 :PRINT"1 ---> 1 R 
L AYER w í t h 3 ÜYST I CK " : L0CATE2 , 7 : PR I N 
T"2 — > 1 PLAYER with KEYBOARD " : PR I 
NT : PR I NT : PR I NT : I NRUT A 
690 IF A=l THEN 2=1 
700 IF A=2 THEN Z=0 

705 IF A>2 OR MI THEN PLAY"-/15oll8 
cd":GOTO 680 

710 CLS: C i = 1 : C2= 1 : C3= 1 : C4= 1 : CE= 1 : GO 
SUB 5300 

720 CLS: LOCATE 1 , 1 : PR I NT " PLAYER 1 
READY":FOR I =0TO 1 000 : NEXT : GOTO 920 
730 ON STOP GOSUB 5430 
740 STOP ON 

750 jf ALGUNAS SUBRUTINAS 
760 » •- DEL PANEL 

770 LINE(0, 130) - (256, 135) ,6,BF:LINE 
í|. 135)--(256, 191) 1,BF 

780 PRESET (100, 140) : COLOR 15: PRINTtt 
1, "COINS: ": PRESET (180, 140) :PRINT#1, 
"MATCHES " : PRESET ( 1 90 ,155): PR I NT# 1 , M 
A 

790 PRESET ( 20 p 1 40 ) : PR I NT# 1 , " MEM " a 

PRESET ( 30 , i 60 ) : PR I MT# 1 L 1 

800 RETURN 

S10 * MOVIMIENTO 

820 D=STICK(Z) 

830 IF D = 1 T H E N Y = Y • - 5 

840 IF D = 2 T M E N Y = Y ~- 5 : X = X + 5 

850 IF D=3THEMX=X+5 

860 IF D=4THENX = X+5: Y=Y+-5 

370 IF D = 5 T H E N Y = Y + 5 

880 IF D = 6THENX = X--5: Y=Y+5 

890 IF D=7THENX=X-5 

900 IF D=3THENX=X~5: Y=Y-5 

910 RETURN 

920 ' 1ER CUARTO 

930 SCREEN2 : CLOSE : OREN " GRP : " AS# 1 : CO 
LOR 15, 1. 1: X=10: Y=65: RO=l 
940 SPR I TE* ( 8 ) =CHR* ( ¡?<H38 ) +CHR* ( &H7 
C ) +CHR* ( &H54 ) +CHR* ( &H54 ) +CHR* < &H7C ) 
+CHR* <?:H38) +CHR* (?<H0) +CHR* (&H38) 
950 SPR ITE*'< 14) =CHR* ( &HEF > +CHR* ( ?<H2 

8 ) + CHR* ( 2íH7E ) +CHR* ( &HFF ) +CHR* ( ?<HFF ) 
+CHR* 1 &H7E ) +CHR* ( &H28 ) + CHR* ( &HEF ) 
960 SPR I TE* ( 1 ) =CHR* ( &HBD ) +CHR* ( &H7 
E ) +CHR* ( &HD7 3 +ÓHR* { &HD7 ¡ +CHR* ( &HPF ) 
+CHR* ( &H7E > +CHR* ( &HFF ) +CHR* i &HD5 ) 
970 SPR I TE* (11) =CHR* ( &H38 » +CHP* ( ?<H7 
C>+CHR*(&HFÉ> +CHR*<S<HD6> +CHR* i &HD6 ) 
+ CHR* ( 2/.HFE ) +GHR* ( StNPf ) +CHR* ( &H54 ) 
930 SPR I TE* (12) =CHR* ( S<H99 ) +CHR* ( &H9 

9 ) +CHR* ( S/.HFF ) +CHR* ( &H3C ) +CHR* ( &HFF í 
+CHR* (&HBD) +CHR* (&HBD) +CHR* (&H99) 
990 SPR I TE* C ) =CHR* ( ?<H3C ) +CHR* ( kHÚC 
) +CHR* i?.;H3C) +CHR* (^1-113) +CHR* HhZÜ) + 
C'HR* ( ?<H5A ) +CHR* ( m 1 8 > +CHR* ( 2/H66 ) 

1 000 SPR I TE* ( 1 3 ) =CHR* ( ) +CHR* (24) +C 
HR* (60) +CHR* 126) +CHR* ( 126) +CHR* (60 
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) +CHR* ( 24 ) +CMR$ ( ® > 
1010 GOTO 1-060 
1020 ' GRAFISMÜ 

1 030 LINE (0, 0) - ( 256 , 1 i , 8 , BF : L I NE < 
, 10) -- ( 10, 50) , 8, BF: LINE (0, 80) - ( 10, 13 
0) , 8, BF: LIME < 100, 0) - ( 1 10, 30) , 8, BF: L 
I NE ( 1 00 . 1 1 > ~< 1 1 , 1 30 ) , 3 , BF 
1 04 L I NE ( 240 , ) < 256 , 1 00 ) , 3 , BF : L I 
NE (110. 5) --(140, 15) , 12. BF: LINE (1*0, % 
25) -(220, 135) , 12, BF : LINE (245, 100) -( 
256, 12?) , 12,BFsLINE(0, 130) -(256, 135 
) , 3,BF 

1050 PRESET (30, 2) : COLOR 1 : PRINTttl , " 
RÜOM 1" 
1055 RETLIRM 

1060 GOSUB 760: GOSUB 1020 

1070 IF RO=l THEN X= 1 : Y=65 : GOTO 10 

90 

1075 IF R0=5 THEN RO= 1 : X= 1 30 : Y=20 : G 
OTO 1090 

1080 IF R0=2 THEN RO= 1 : X = 230 : Y= 1 1 5 : 
GOTG 1090 

1085 IF R0=3 THEN RO= 1 : X=205 : Y= 1 1 5 : 

GOTO 1090 

1090 F1=-10:S1=1 

1100 GOSUB 310 

1120 RUT SPRITE 0, (X, Y), 15,0 
1130 IF X< 5THEN X=5 
1140 IF Y<10 THEN Y=10 
1150 IF X< 190 AND Y>120 THEN Y- 120 
1160 IF X>220 AND Y>120 THEN Y=120 
1170 IF Y<105 AMD X>230 THEN X=*230 
1130 IF Y<35 AND X>90 AND X<100 THE 
N X=90 

1190 IF Y<85 AND X< 115 AND X>105 TH 
EN X=115 

1200 ' FANTASMAS, ETC 
1210 RUT SPRITE 1 , (30, 85) , 1 , 12 
1220 PUT SPRITE 2 , ( 1 30 , 1 00 ) , 1 , 1 
1230 PUT SPRITE 3 , (200, 50) , 1 , 10 
1240 PUT SPRITE 4 , ( 2 1 , 1 00 ) , 1 , 1 2 
1250 IF S1=1THENPUT SPRITE 5,(60,F1 
) , 1 5 , 1 1 

1260 IF X>30 AND X< 85AND S1=1THEN 
F1=F1+14:BEEP 

1270 IF F1M30 THEN SI =2: PUT SPRITE 
5, (0,0) ,8.11 

1230 PUT SPRITE 6 , ( 1 30 , 40 ) , 1 , 1 2 
1290 IF Cl=l THEN PUT SPRITE 7, (90, 
20) ,1,13 
1300 ' LIMITES 

1310 IF Y<15 AMD X>105 AND X<140 T 
HEN GOTG 3860 

1320 IF X>250 AND Y>100 THEN GOTG 
1 700 

1330 IF Y>125 AND X>190 AND X<220 
THEN GOTO 2360 

1340 IF CE=1 ANDSTR I G ( Z ) ~- 1 THEN GO 




SUB 1410 

1350 OM SPRITE GOSUB 1 450 : SPR I TEON 
1360 GOSUB 3040 

1370 IF X<10AMD Y<30 ANDY>50 ANDC1 
==2ANDC2^2ANDC3-=2ANDC4-2THEN GOTO520 


1380 ' 
1390 ' 

1400 GOTO 1100 
1410 ' CERILLAS 1 

1420 CIRCLE(X+3, Y+3) ,20, 1 1 : RA I NT ( X-i- 
3 , Y-t-3 ) ,11: MA~MA- 1 s GOSUB 760 s GOSUB 1 
20 

1430 FOR 1=0 TO 1000: NEXT: CIRCLE (X+ 
3, Y+3) ,20, l:PAINT(X+3,Y+3) , 1 : GOSUB 
1 020 

1435 IF MA<1 THEN CE=2 
1440 RETURN 
1450 ' COLLISION 1 
1455 SPRITE OFF 

1460 IF X>80 AND XU10 AND Y -".40 THE 
N Cl=2: PLAY"06L8V15CEGCEGCEG" : RETUR 
N 

1465 GOSUB 1680 

1470 IF L í > t THEN L 1 =L 1 - 1 S X= 1 i Y-65 : 
GOSUB 760: RETURN 1090 

1480 IF L 1 >2THEN L 1 =L 1 - 1 : X = 1 : Y~=65 : 
GOSUB 760: RETURN 1090 

1490 IF L 1 = 1 THEN L 1=0: GOSUB -760:GOT 
01550 

1550 ' FINAL 

1 560 L I NE ( 50 , 50 ) - ( 1 30 , 75 ) , 1 5 , BF 
1570 PUT SPRITE , ( X , Y ) , 1 5 , 8 : PRESET 
(55, 60) : COLOR 1 : PRINTttl , "PL. 1 GAME 
O VER." : FOR 1=0 TO2300 : NEXT : PLAY " V 1 5L8 
06GEC05GEC04GEC03GEC02GEC01 CDCD" ! F 
ORI=0TO 1200: NEXT 

1580 SCREEN 0: COLOR 15: LOCATE 2,5:P 

RINT"QUIERES VOLVER A JUGAR (S/N) ? 
ii 

1590 I$=INKEY$ 

1600 IF I*="N"OR I*="r."THEN CLS:GOT 
O 5430 

1610 IF I*="S"OR I$="s"THEN 1630 
1620 GOTO 1590 

1630 CLS:PRINT:PRINT:PRINT"CON FRES 
ENT ACION (S/N) ?" 
1640 I$=INKEY$ 

1650 IF I*="N"OR I $= " n " THENRUN 630 
1660 IF r*= , 'S."DR" I*="s"THENRUN 10 
1670 GOTO 1640 

1680 BEEP : PLAY " V15o41 4ar64al 1 6r64a 

r641 4ar64o51 4c::o4r641 16br641 4bl 16r64 

ar64L4arl6L8a#14a" 

1690 RETURN 

1700 ' 20 CUARTO 

1710 SCREEN 2 

1720 COLOR 15, 1, 1 
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2310 TF 1 1 ':?Tl-lFM i 1—1 1—1 r cnci vú 7¿,-,i, 


1 R40 Yr:: 1 (71 - PUss^" V~ 1 1 t= i 




PPJ| IDKI ■) RAÍ?) 


X '-J >..' LJ LJ •_) LJ i_> a X 




23^'0 TF 1 1=1 THFM 1 1 — í7i . Pnc-l ID -i ¿ r,\ u r o-r 
j- -'j~\j x r i_ x — x i nr_N L_ 1 — VJ . bUbUD / oí;' s b'J ! 


i RA0 Pl IT RPPTTF o\ < Y Vi 1 er . í/l 




lj x w wi yj 


i q~7 TF Y :' AMn V-' 1 (/IR TI-4PM Y -"^í"< 




r "'330 FvFTI IPM 
j— ■-• ■-• yj r\ c i Urvi ™ 


i RR0 TC V '> 1 t?tá TMFM V=si r?0\ 

J. t) LJ x r i .•• X £. W 1 nLH t — X j~ 51' 




2340 ? 
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1950 IF Y< 55 AMD V 1 SSAWn Y -' ^í71r/(TI-IPM 
x 7\_j>_' xr i •. wJuJ minu A .•• i jüHInU A ••. jLyjVJ 1 McN 




2420 1 INE (245 ñY^-C'PKÁ 1"^.0) R rp-i t 


Y = 55 




NE (110. 1 1 ) - ( 1 2$ 1 30 ) R pp «IT MP C 1 QIH 
. j. x >. , x x / \ x j_ , x •_■ >c /■ , o , t? r S L. i IN t: 1 1 r í;' 


i oaíi TF y t> (?í üMn v<' 5*? AMn y •. 1 d,;i tu 
i 'oy xr rtlHü i ■■■jj HlNU a .■■ 1 VL' In 




, 5 ) --• ( 220 . 1 5 ) 12 RF-I TNf'(^40 1 oíos) - 
, u / . ^--u-j- , iü / „ x^, C'r » l_ x inc ^. jlhvj h i s;h;' .' u 


FN Y = ^0«=¡ 






1 97('l TF Y 1 AMn V'-AP AMPl V •■" C)t~A Tur - 

i 7 / yj ir a .•• i himU Y .•• QO HInu t . oí;' 1 Ht 




CjÁTíS pppqpT *?) » rni FlP 1 -PPTMTíM " 
ju. *t •_■ yj r n. c_. o c i \ •_• jí» , jl. > ■ LULUn i ■ rnin l ftl , 


N Y = AR 




n. lj i i ■_• 


•J ORííJi TF Y ':• 1 AMP V QT AMD V \Di"l TLJr" 
X 7üíi ir A .-■ 1 vJwl HlNU Y -. HlNU Y . OÍ:'' 1 Htl 




'7440 PFTI IPN 


M Y = 93 

1 M T 7 -_' 




2450 GÜ3UB 2400.GOSLJB 760 


i 990 » FAMTARMAR FTP 

1'/»-' I MIN 1 HJI InO, C, 1 Li 




^•4A0 ? 


^000 Pl IT PPPTTP 1 f"^ 1 ^ 1 1 í"1 1 1 IT» 
■i_}-'i_mí' rui ai r\ l i L in'' --'v- 1 n 1 1 íí' ^ l|i 1 ¿. 




?A7i/| TF pn = 1 TUPM pn = f ■ Y — Óíüft'í • V — *^f"1 • P 
áfi.*t> k» ir r\i_i— i i nciN n.u — •_• . a — jl.vj ., i -*«£»'■ o 

nTfT'^490 

LJ 1 1 — ' X_ T / 


"?0t0 Pl IT RPPTTF 9 Í4.0 =¡0 > 1 i 1 
j_ x r u i jri\i i c jí. ■ \ ts' ( jei / ( l ( l l 




^0^0 Pl IT RPPTTF "S M Sf/I SSí 1 1 
>-' j— >-' • lj i o r r\ x i c , \ i o ji' ^ o o i* « 1 ■ 1 




r ?4R0 TF FTl = 4 THFM pn = "\ ■ Y — '~ , ~r. c:r , • \'= 1 1 

¿*TOK' IT n.U — «f I n C I N R LJ — •_■ • A — jL. * Y — 1 1 J 


*^030 Pl IT RPPTTP ¿l í 1 ~'0\ 1 í/W"n 1 l *3 




r^Aom F7=R0 ■ F~*,- 1 "T0 


^040 pi IT RPPTTF S í^f"5(71 1 1 •=•", ^ I i i 




5 Fi Ti R 1 1 R R 1 


''.'•V/JRí/l F'l IT PPPTTP A / 1 rtl "#i5frS 1 1 CA 




(71 Pl IT RPPTTF (Y V) 1 "5 (7Í 


¿-YJoyJ ru l orl-\l le. 1^, \.j¿.Z'\Q 9 o\í> ) , 1 „ 1 




TP V-"' 1 r"1 AMD Y '•• 1 Pf'l AMP V¿ e ^ r >«7i TU 
jí. \JjL.VJ ir Y s 1U HlNU A .■• ¡."VJ HlNU A ••. jl.jl.VJ I M 


^'í717í/i Pl IT opc.TTP P rOíSi /l ¿í \ i < í7< 

^.«' / >;' r u i br r.i it a ^ ^ oí;' ¡» *fjíJ ; , l , l $;) 




FN RPPFFM 5> ■ pn~T « FiílTn 1 (71A(7í 
cin oU/nvCi—iN jl. . r>u — •_' . uu i u iií'oi;' 


'7>0R(/1 pnpi ip ~?i~\ñ.G\ 




R 40 PnPI \V< "^040 

jl.^JHYJ DUOU D ..• Si' H K» 


7yj 




5>55<3J ' 

vj ■_' K' 


^100 ? 

j_ x y.' yj 




j... > — 1 O YJ 


5> 1 1 ' 




"j> te i70i 7 FANTARMAR FTP 

¿..\J / VJ 1 rl 1 N 1 H 1 1 M O p C 1 Ui ■ 


1 f 71 TP P 1-1 — 1 TUPM Pl IT ODPTTr o / I ~<~^ r,\ 
jl.Ijl.íC' ir Ui.- x l nclN rUI ürr.l 1 t r, í^oí;' 




?t-ofl Pl IT RPPTTP 1*7 í ^ 1 171 i Oí ITS) 1 1/1 
«uD K* i lj i o r r\ i i c i / , '. ^_ i ( . , i s;- 1 v. • 1 , i i 


, 100) ,1,13 




Pl IT RPPTTF 1 C?0 40) 1 1*3 


P 1 T,0 * 




o¿0f7j pi it RPPTTF <" = i0 c ¡0 ^ 1 10 

J— ' — ' ij .'J 1 LJ 1 ' — M l : ± 1 1 — jL. , ; —J Yj , \J YJ .• , X , X YJ 


jl. itK' uin jr ni i c. dU3Udji¿lm-i: orKi i cUN 
2150 IF CE=1 THEN IF STR I G ( Z ) == - 1 TH 




"7X i Oí p| IT RF : 'PTTF 3 ^30 R0 ) 1 1 1 
jl. o x yj i lj i o r r\ x i c •_■ , \ •_• yj , o yj .' , x , x i 




2620 PUT SPRITE 4 , í 20 , 1 1 ) . 1 , 1 2 


EN bübUB 2210 




¿!£j j0 PUT SPFIITE 5, (100, 100) ,1,3 


2160 ' 




2640 PUT SPRITE 6 , ( 1 40 . 30 ) , 1 , 1 2 
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2650 PUT SPRITE 8, (210, 40) , 1 , 1 1 
2660 IF X<15 THEN X=15 
2670 IF X>235 AND Y< 100 THEN X-235 
2680 IF Y< 15 AND X<190 THEN Y=i5 
2690 IF X<85 AND X>75 AND Y<85 THEN 
X=85 

2700 IF X>59 AND Y<85 AND X<75 THEN 
X=59 

2710 IF Y>60 AND Y<70 AND X > 1 1 THE 
N Y-60 

2720 IF Y<85 AND X : • 1 1 AND Y >70 THE 
N Y=85 

2730 IF X>100 AND X<115 AND Y>105 T 
HEN X-100 

2740 IF X::125 AND X>115 AND Y>105 T 
HEN X-125 

2750 IF Y> 120 THEN Y=120 

2760 IF X>220 AMD Y<10 THEN Y=10 

2770 > FANTASMAS > SE MUEVEN 

2780 PUT SPR I TE 13,(1 40 , F2 ) , 1 5 , 1 1 

2790 PUT SPRITE 1 4 , ( 1 55 , F3 ) j 1 5 , 1 1 

2800 PUT SPRITE 1 5 . ( 1 75 , F2 ) , 1 5 , 1 1 

2810 PUT SPRITE 1 6 , ( 1 90, F3 ) , 1 5 , 1 1 . 

2820 F2=F2+11 

2830 F3-F3--11 

2840 IF F2M30 THEN F2-80 

2850 IF F3<80 THEN F3=130 

28t,0 IF CE=1 AND STRIG(Z)— 1 THEN 

GOSUB 2910 
2870 ON SPR I TEGOSUB2960 : SPR I TEON 
2380 IF X>245AND Y>100 THEN GGTQ315 
& 

2900 GOTO 2500 
2910 ' CERILLAS 

2920 CIRCLE(X+3, Y+3) ,20, 1 1 : PAINT ( X + 
3 , Y+3 ) , 1 1 : MA-MA 1 : GOSUB 760 :' GGSUB24 

00 

2930 FGR 1=0 TG 1 000 : NE X T : C I RCLE ( X 
3, Y+3) ,20, l:PAINT(X+3, Y+3) . 1 : GOSUB 2 
400 

2940 IF MA<1 THEN CE=2 

2950 RETURN 

2960 ' -COLLISION 1 

2970 SPRITE OFF 

2980 GOSUB 1680 

2990 IF L 1 > 1 THEN L 1 =L 1 - 1 : X-205: Y=20 
: GOSUB 760: RETURN 2490 

3000 IF Ll >2THEN L 1 =L 1 - 1 : X-205 : Y=20 
: GOSUB 760: RETURN 2490 

3010 IF L1=1THEN L 1=0: GOSUB 760: GOT 
O 1550 
3020 RETURN 
3030 ' 

3040 7 VER Sí TIENES MONEDAS 

3050 IF Cl=2 THEN PUT SPRITE 7, (90. 

165) , 11, 13 

3060 IF C2=2 THEN PUT SPRITE 9,(105 
, 165) ,11,13 



3070 IF C3=2 THEN PUT SPRITE 10,(12 
0, 165) , 1 1 , 13 

3080 IF C4=2 THEN PUT SPRITE 11,(13 

5, 165) ,11, 13 

3100 ' 

3120 ' 

3130 RETURN 

3140 > 

3150 ' 40 CUARTO 

3160 3CREEN2:C0L0R 15,1,1 

3170 9 

3180 GOTO 3250 
3200 » GRAFISMO 

321 L I NE ( , ) - ( 256 , 1 ) , 8 , BF : L I NE (0 
, 0) - (10, 130) , 8, BF: LINE (10, 80) - (150, 
90 ) , 8 , BF : L I NE ( 250 , ) - ( 256 , 1 30 ) ,. 3 , BF 
3220 L I NE ( , 1 30 ) - ( 256 , 1 35 ) , 8 , BF : L I N 
E<5, 100) -(15, 130) , 12, BF: LINE (120, 40 
) - ( 256 , 50 ) , 8 , BF : PRESET ( 30 ,2) : COLOR 
1 :PRINT#1 , "ROOM 4" 
3230 ' 
3240 RETURN 

3250 GOSUB 3200 : GOSUB 760 
3260 " 
3270 í 
3280 f 

3290 F3=255:R0=4: X=15: Y=115 
3300 GOSUB 310 

33 1 PUT SPR I TE , ( X , Y ) , 15, 

3320 IF X< 10 AND Y>100 THEN R0=4:3C 

REEN 2: GOTO 2450 

3330 ' LIMITES 

3340 IF X<15 AND Y<100 THEN X=15 
3350 IF X>240 THEN X=240 
3360 IF Y>115 THEN Y=115 
3370 IF Y<15 THEN Y=15 
3380 IF X>115 AND Y>28 ANDY< 40 THEN 
Y-28 

3390 IF X>115 AND Y<55 AND Y>40 THE 
NY=55 

3400 IF X<155 AND Y>68 AND Y<80 THE 
N Y=68 

3410 IF X< 155 AND Y<95 AND Y>S0 THE 

N Y=95 

3420 7 FANT. 

3430 PUT SPR I TE 1, (50,20) , 1, 14 



3440 PUT SPRITE2, (60,40) , 1 

3450 PUT SPRITE3, (35,45) , 1 

3460 PUT SPR ITE4, (50,70) , 1 

5470 PUT SPRI TES, (30,60) , 1 



3430 PUT 3PRITE6, (130, 12) , 1, 10 
3490 PUT SPR I TE 1 9 , (1 60 , 30 ) 



60) 



3500 PUT SPRITE12, (235 
3510 PUT SPRITE 13, (190 
3520 PUT SPRI TE 14, (153 
3530 PUT SPRITE15, (100 
3540 PUT SPR I TE 16, (50, 100) , 1,3 
3550 GOSUB 3040 



1 1 

10 
12 
14 



1, 14 
1,11 
100) ,1,14 
95) , 1, 11 
120) ,1,8 
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3560 PUT 3PRITE 1 7 , ( F3 , 80 ) , 1 5 , 1 1 

3570 IF Y<95 THEN F3=F3-17 

3580 IF F3<150THEN F3=245 

3590 PUT SPRITE 18, (170, 100) , 1, 10 

3600 " 

3610 ' 

3620 ÜN SPRITE GÜSUB3760 : SPR I TEÜN 
3630 IF CE== 1 AND3TR I G ( Z ) ™ -■ 1 THEN GQ3U 

B 3710 

3640 IF C3-1 THEN PUT SPRITE1 0, (20, 

20 ) , 1 , 1 3 

3700 GÜTÜ 3300 

3710 ' CERILLAS 

3720 CIRCLE (X +3, Y+3) , 20, 1 1 : PAINTÍX+ 
3 , Y -i- 3 ) , 1 1 s MA==MA - 1 í GOSUB 760 : G0SUB32 

00 s 

3730 FÜR ]>0 TO 1000; NEXT: CIRCLE (X + 
3 , Y+3 ) , 20 , 1 ! PA I NT (X+3, Y+3 ) , 1 : GOSUB-3 
200 

3740 IF MA< 1 THEN CE==2 
3750 RETURN 
3760 : " CÜLLISIDN 4 
3770 SPRITE ÜFF 

3780 IF X<35 AND Y<35 THEN 03-2: PLA 
Y " V 1 5L8Q6CEGCEGCEG " : .RETURN 
3790 GOSUB 1680 

3800 IF Ll >1THEN L1=L1- 1 s X-205: Y=20 
: GOSUB 760: RETURN 3290 

3810 IF L 1 >2THEN L 1 =L 1 - 1 ¡ X = 205 s Y=20 
¡GÜSUB '."'60 s RETURN 3290 

3820 IF L. 1 - 1 THEN L 1 -0 : GOSUB 760: GÜT 
Ú 1 550 
3830 RETURN 
3840 * 
3850 ' 

3860 ' 50 QUARTÜ 

3870 GLOSE: 3CREEN 2: COLOR 1 5 ., 1 ,1:0 

PEN"GRP:: "ASttl 

3880 7 . 

3890 GOTO3950 

3900 " GRAFI3M0 

3910 LIME (0,0) -(256, 10) ,S,BF:LINE(0 
, ) ••- < 1 , 1 30 ) , 8 , BF : L I NE ( , 1 30 ) - ( 256 , 
135) ,8, BFaLINE (245,0) ■••(256, 130) , 8,B 

F 

3920 L I NE ( 60 , 70 ) r ( 225 , 80 ) , 3 , BF s L I NE 
( 140, 70) -- (150, 130) N 8, BF:LINE<240,20 
)--(250,50) , 12,BF:LINE(110, 125) -(140 
, 135) , 12, BF 

3930 PRESET ( 30 , 2 ) : COLOR 1 : PR I NT# 1 , " 
ROOM 5" 
3940 RETURN 

3950 GOSUB 3900: GOSUB 760 
3960 ' 

3970 IF RO-1 THEN R0=5: X-125: Y=l 15: 
GOTO 3990 

3980 IF R0=6 THEN R0=5 : X=235 : Y=35 
3990 * 

4010 A1=10:A2=60 
4020 GOSUB 810 



4030 PUT SPRITE 0,(X,Y),15,0 

4040 IF X>100 AND Y>127 AND X<140 T 

HEN SCREEN 2:R0=5:G0T0 1060 

4050 GOSUB 3040 

4060 ' FANT. 

4070 PUT SPRITE 1 , ( 1 00 , 1 20 ) , 1 , 1 

4080 PUT SPRITE 2 , ( 1 20 , 1 00 ) , 1 , 8 

4090 PUT SPRITE 3, (70, 90) , 1 , 8 

4.100 PUT SPRITE 4, (50,70) , 1, 14 

4110 PUT SPRITE 5, (20,80) , 1, 10 

4120 PUT SPRITE 6, (35, 50) , 1 , 1 1 

4130 PUT SPRITE 1 2 , ( 1 00 , 40 ) , 1 , 1 

4140 PUT SPRITE 1 3 , ( 1 20 , 20 ) , 1 , 3 

4 1 50 PUT SPR I TE 14,(1 40 , 60 ) , 1 , 1 

4160 PUT SPRITE 1 5 , ( 1 60 , A 1 ) , 1 2 , 1 2 

4170 PUT SPRITE 1 6 , ( 200 , A 1 ) , 1 2 , 1 2 

4180 PUT SPRITE 1 7 , ( 1 75 , A2 ) , 1 2 , 1 2 

4190 PUT SPRITE 18, (215, A2) , 12, 12 

4200 A 1 = A 1 + 1 : A2= A2- 1 

4210 IF Al>60 THEN Al -10 

4220 IF A2<10 THEN A2-60 

4230 ? LIMITES 

4240 IF X<15 THEN X-15 

4250 IF X> 240 THEN X~240 

4260 IF X>235 AND Y >20 AND Y<50 TH 

EN GOTO 4550 

4270 IF Y>130 THEN Y- 130 

4280 IF Y<15 THEN Y- 15 

4290 ' 

4300 ' 

43 1 I F STR I G ( Z ) =-• 1 THEN GOSUB4400 
4320 ON SPRITE GO3UB4450 : SPR I TEÜN 
4330 IF X>60 AND X<220 AND Y>58 AND 

Y<70 THEN Y-58 
4340 IF X>60 AND X<220 AND Y<35 AND 

Y ; : 70 THEN Y-85 
4350 IF X>130 AND Y>70 AND X< 143 TH 
EN X=130 

4360 IF X<155 AND Y>70 AMD X>144 TH 
EN X-155 
4390 GOTO 4020 
4400 ' CERILLAS 5 

4410 CIRCLE ( X + 3, Y + 3) ,20, 1 1 : PA I NT ( X + 
3, Y+3) ,11: MA-MA--1 : GOSUB 760: G0SUB39 
00 

4420 FÜR I =0 Tü 1 000 s NEXT s C I RCLE ( X + 
3, Y+3) ,20, l:PAINT(X+3, Y+3) , 1 : G0SUB3 
900 

4430 IF MA<1 THEN CE=2 

4440 RETURN 

4450 > COLUSION 5 

4460 SPRITE OFF 

4470 GOSUB 1680 

4480 IF L 1 > 1 THEN L 1 =L 1 -• 1 : X- 1 25 : Y= 1 2 

0: GOSUB 760: RETURN 4010 

4490 IF L 1 >2THEN L 1 =L 1 - 1 : X- 1 25 : Y= 1 2 

0: GOSUB 760: RETURN 4010 

4500 IF L1=1THEN L1=0:GO3UB 760:GOT 

O 1550' 

4510 RETURN 







22322=2= 
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Programa 




13)QtXl« " C(OSC'n|0«( 



4520 •- 

4530 ? 

4540 ! 

4550 * 6o CUARTO 

4560 SCREEN 2: COLOR 15,1,1 

4570 CLOSE:OPEN"GRP: "AS#1 

4580 ' 

4590 GOTO 4660 

4600 ' GRAFISMO 

4610 LINE(0 !I 0)-(10, 130) ,8, 
, 0>--(256, 10) , 8,BF:LINE<0, 1 
135) , 8, BF: LINE (245, 0) -- (256 
F 

4620 



BF : L I NE ( 
30) - (256, 
ü 1 30 ) , 8 , B 



4630 
RGOM 
4640 
4650 
4660 
4670 
4680 
4690 
4700 
4710 
4720 
EEÑ ; 
4730 
4740 
4750 
4760 
N Y =65 
4770 IF 
N Y=96 
4780 IF 
4790 ' 
4800 
4310 
4820 



LINE (0,80) -(210, 90) , 8,BF:LINE( 

_0R 1 : PRINT#1 , " 



5, 20) -(15, 50) , 12, BF 



PRESET (30, 
6" 




RETURN 
GOSUB 



X=15: Y=35 
GOSUB 810 

PUT SPRITE 0, (X, Y) , 15 
IF X< 10 AND Y<50 THEN 
!:GOTO 3950 

IF X>230 THEN X = 230 
IF X< 15 AND Y>50 THEN 
Y>115 THEN Y=115 



IF 
IF 



9 ® 

R0 = 6: SCR 



5(*Í5 



Y>65 AND X<215 AND Y<30 THE 
X<215 AND Y<96 AND Y>80 THE 



::i5 THEN Y=15 
? FANTASMAS ETC. 
PUTSPRITE 1, (10,50) , 1 
PUTSPRITE 2, (25,50) , 1 
PUTSPRITE 3, (40,40) , 1 
4830 PUTSPRITE 4,(35,70),1 
4840 PUTSPRITE 5, (55,55) , 1 
4350 PUTSPRITE 6,(70,50),! 
4860 PUTSPRITE 8,(190,70), 
4870 PUTSPR I TE 1 2 , (1 20 , 20 ) , 
4880 PUTSPR ITE1 3, (150,40), 
4890 PUTSPRITE 14, (30,110), 
4900 PUTSPR ITE15, (90,100), 
49 1 PUTSPR I TE 1 6 , (1 50 ,110) 
4920 PUTSPR I TE 1 7 , (1 90 , 1 00 ) 
4930 PUTSPR ITE1 3, (210,120) 
4940 PUTSPRITE 1 9 , (180,30), 
4950 PUTSPR ITE20 , (130,40) , 
4960 GOSUB 3040 
4970 IF C4=l THEN PUT SPRI 
70) ,1,13 



4980 IF 
UB5010 



CE = 1 AND STRIG(Z) 



, 10 
, 1 1 
, 12 
, 14 
, 8 
,11 
1, 14 
1 , 12 
1,11 
1,3 
1 , 14 

1 , 12 

1,11 

1 ii 10 
1, 10 
1,10 

TE 1 1 , (10, 
i THEN GOS 



4990 GN SPRITE GOSUB 5060 sSPRITEON 
5000 GOTO 4700 
5010 ' CERILLAS 5 

5020 CIRCLE(X+3, Y+3) ,20, 1 1 : RAI NT ( X + 
3 , Y+3 ) , 1 1 : MA=MA- 1 : GOSUB 760 : G0SUB46 

00 

5030 FOR 1=0 TO 1000: NEXT: CIRCLE (X + 
3, Y+3) ,20, l:PAINT(X+3, Y+3) , 1 : G0SUB4 
600 

5040 IF MA< 1 THEN CE=2 
5050 RETURN 
5060 ' COLLISION 5 
5070 SPRITE OFF 

5030 IF X<25AND Y<85 AND Y>60 THEN 
C4=2: PLA Y " V 1 5L8CEGCEGCEIGCEG " : RETURN 
5090 GOSUB 1680 

5100 IF L 1 > 1 THEN L 1 =L 1 -• 1 : GOSUB 760: 
RETURN 4660 

5110 IF L 1 >2THEN L 1 =L 1 - 1 : GOSUB 760: 
RETURN 4660 
5120 IF L 1 = 1 THEN 



O 



1550 



L 1=0: GOSUB 760: GOT 



130 



•: A*="o"THEN RUN 163 



IF.A$="E"OR A$= " e " THEN GOTO 54 



RETURN 

5200 " FINAL CON LAS 4 MÜN . 
5210 COLOR 15: SCREEN : LOCATE0 , 5 : PR 
INT"LO HAS CONSEGUIDO EN EL GRADO " 
; G : PR I NT : PR I NT " T I ENES " : L 1 ; "VI DA ( S ) 

Y TE SOBRAN " ; MA: " CERILLA (S) 

ii 

5230 PR I NT : PR I NT PR I NT : PR I NT : PR I NT " 
APRIETA CP PARA INTENTARLO EN UN 

GRADO DE DIFICULTAD MAS ALTO " 
5240 PR I NT : PR I NT :PRI NT "APRIETA : 'E ? 
PARA TERMINAR" 
5250 INPUT A* 
5260 IF A$=" 



5270 
30 

5280 I F A*< > " E " OR A*< > " e " OR A*< > " o " 
OR A*O"0"THEN CLS:GOTO 5230 
5290 GOTO 5290 

5300 * ELEGIR GRADO DE DIFICULTA!' 
5310 CLS : PR I NT : PR I NT : PR I NT " QUE GRAD 
O DE DIFICULTAD ELIGES ?" 
5320 PR I NT : PR I NT " NOTA : SEGUN QUE GR A 
DO VARIA EL NUMERO DE CERILLAS 

Y EL NUMERO DE VIDAS" 

5330 PR I NT : PR I NT : I NPUT " FAC I L (1 -7 ) 
DIFICIL" ; G 

5340 IF G=l THEN L1=3:MA=90 
5350 IF G=2 THEN L1=3:MA=50 
5360 IF G=3 THEN L1=3:MA=20 
5370 IF G=4 THEN L1=2:MA^20 
5330 IF G=5 THEN L1=2:MA=10 
5390 IF G=6 THEN L1=1:MA=10 
5400 IF G=7 THEN L1=1:MA=5 
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5410 IF G>7 0RGC1THEN PLAY"vl5ol 1 8c 
d":GÜTO 5300 

5420 RETURN 

5430 ' auto destrucción ? 

R440 Pl cj . cjccp . rni (Tito i 1 -", 1 i „ crncrh i ííi 

: L0CATE5 ,, 5 : PR I NT " ME AUTO ' DESTRUYO ( 




S/N) " : INPUT m 

5450 IF A*="N"OR A$= : " n " THEN CLS : END 
5460 GOSUB 1 630 : POR I =0TQ 1 000 : NEXT : C 
LS: LOCATE 14, 5: PRI NT "ADIOS" 
5470 FQRI=0TO 2000 : NEXT : CLS s NEW 
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Especial para nuevos 
usuarios. 

Para que ningún lector 
quede al margen te propo- 
nemos una nueva sección/ 
concurso. 

¡Participa con tu pe- 
queño programa de gráfi- 
cos, sonido, juego o truco! 

BASES 

1. ° Podrán participar to- 

dos nuestros lectores, 
cualquiera que sea su 
edad. 

2. " Los programas se re- 

mitirán grabados en 
cassettes debidamente 
protegidas dentro de 
su estuche plástico. 

3. ° No se admitirán aque- 

llos programas plagia- 
dos o editados por 
otras publicaciones. 

4. " Las mejoras a los pro- 

gramas se considerarán 
una aportación al mis- 
mo y se publicarán en la 
sección Línea Directa. 



PREMIOS 

5. " MSX CLUB premiará 

aquellos programas 
publicados con 2.000 
pts. 

6. - MSX CLUB se reserva 

el derecho de abonar 
los premios en metáli- 
co o su equivalente en 
software, haciéndolos 
efectivos a los 15 días 
de publicados. 



FALLO Y 
JURADO 

7. ° El Departamento de 

Programación actuará 
como jurado y su fallo 
será inapelable. 

8. ° Los programas remi- 

tidos no se devolve- 
rán, siendo destruidos 
aquellos que no sean 
seleccionados. 
10.° El plazo finalizará el 
30 de junio de 1987. 
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LAS BUENAS COMPAÑIAS 
DEUNMSX 

PROFESIONAL 




COMPUTER SYSTEM 



ML-FX1/2 □ 

El MSX profesional 

80 Kb RAM. 

Teclado Numérico. 

ML-FX2 Programa MAP (B. Datos/ 

P. Textos / H. Cálculo Gráficos/ 

Comunicaciones. 

ML-30FD □ 

La Máxima capacidad en disco. 
1 Mb. (720 Kb. Formateado) 
8 Formatos diferentes 
Chasis previsto para 2 unidades. 



ML-10 DR □ 

Cassette especial para ordenador. 
Admite 1200/2400 baud. 
Cuentavueltas. Señal de monitor. 
Alimentación a red o baterías. 

ML-10 MA □ 

Ratón para diseño gráfico. 
Programa CHEESE de diseño. 
24 Funciones gráficas. 



APLICACIONES □ 

Un Software profesional para un 
ordenador profesional. Contabili- 
dad, Control de Stock, Factura- 
ción. 

CT-1501E □ 

Monitor/Televisión. 
Alta definición. 
Conector SCART. 
Mando a distancia. 



CUPON DE RESPUESTA 



Desearía poder tener más 
información sobre los aparatos 
marcados El de MITSUBISHI. 



Sr.:. 



Domicilio: 



Población: 

MABEL, S.A. 

P° Maragall, 120 - 08027 BARCELONA 



LO MEJOR EIM MSX 




VISITE LA DIVISION 



